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L’UOMO NEL LABIRINTO 


Ti troverai nell'angolo in alto a sinistra di un labirinto disseminato di punti. 
Tu compari nel momento stesso in cui comincerai a muoverti per mangiare i 
puntini sul percorso, guadagnando cosi punti. Immediatamente sarai inse¬ 
guito dai mostri che popolano il labirinto e dovrai subito darti da fare per se¬ 
minarli. Il gioco termina o appena essi riusciranno a divorarti o quando avrai 
fatto fuori tutti i puntini. 

Potrai guadagnare molti più punti ingoiando una delle grosse ciliegie ros¬ 
se: ti è ora infatti permesso di divorare i mostri. Attenzione, però, perchè 
questa super-pillola ha un effetto temporaneo: dura fintantoché i mostri sono 
color porpora: subito dopo ritorneranno a darti una caccia spietata! 

Con W vai in alto 
con A a sinistra 
con D a destra, e 
con X in basso. 

Buon mangiucchiamento! 
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35 PR I NT " UQ3» ......" 
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5 .3=0 : LI =3 : P0KE36879,8 : PRIHT " □" 
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15 DIMA7>,0<7> 
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20 fi=8 
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40 FlD= I HT < RHD < 1 > *3+21 > : IFRHD C 1 > >. 5THEH 
FlD=-fiD 

45 fi S = IH T < R H Ci < 1 > *506 > +7680 

50 FORI=0TO7:K=PEEK<197 >:IFfiBS<SX>+RBS 
SV > = 0THEHP0KE368770 : G0T055 

51 P0KE36878.15 : P0KE36877 .r 235 : G0T055 
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CK1>*23> 

100 IF X < 0 T H E H X=21 
105 IFX>21THEHX=0 
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160 POKER I +CO2 : POKER C I > , 81 

200 IFKO320RI NT < I N2 > *2= ITHEN260 

201 P0KE36878 .,12: FORN1 =255TO230STEP-1 : 
P0KE36877N1 : HE NT 

205 N1=N:V1=V :DN=< 0=3 >-< 0=1>:DV=<0=0 >- 
<■. 0=2 > :C=64 :1F0 V<>0THEHC=9 3 
210 N1=N1+DN : V1=V1+0V 

215 POKECL+V1*22+N1,5 ; IFPEEK<SC+V1*22+ 
NI>=32THEH240 

216 P0KE3687815 : P0KE36877130 
220 P 0 K E S C+V 1*22+N14 2 

225 FORJ=0TO7:1FR CJ >=80+V1*22+N1THENfi= 
R-1 :fìCJ> =0 :8=8+20 

230 HENTJ 
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-RD 

270 IFRSC7680THENRS=RS+506 
275 IFRS>8185THENR8=R8-506 
280 POKERS+CO , 7 : POKERS88 
285 IFfl8=8C+V*22+NTHEN1000 
300 -NENT I :IFfi=0THEN20 
305 IFfl8=0RN0RN0<1> >.9THEN40 
310 GOTO50 
1@00 PRINT"UPUNTI"8 

1005 FORI = 1TO2000:NENT:LI=LI-1 :1FLI>0T 
HENPRINT"3":GOTO16 
1010 P0KE368780 : POKE198., 0 
9999 END 
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225 F'R 1 HTLEFT-i' < DTC+1 > ; L.EFT* C fì$, I > " 1. " 
230 FOR I-1TO10 sHEKT 
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405 PR I NT " TIRARLA - BJ-" CHRT C 28 > " 

410 F=2:SP=SP+1 
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KE36876,0 ;FORI = 1TO150 :HEKT 
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KE36876,8 :FORI = 1T075:HEKT 
1086 P0KE36876,141:FORI = 1TO708s HEKT 
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1038 POKE198,0 
1835 EHO 
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LOTTA NEI CIELI 


Bombarda gli insediamenti di difesa nemici e scendi mitragliando coi cac¬ 
cia per guadagnare punti. 

Appena esci dallo schermo, muovendoti verso destra, ti troverai poi alla 
sinistra di un nuovo paesaggio. Schiva i missili e i caccia nemici appena sbu¬ 
cano fuori nel cielo. 

Le palline blu sono i depositi di carburante, mentre i grossi obiettivi circo¬ 
lari sui trampoli sono i depositi di munizioni. 

Per guardagnare più punti bombarda le basi extraterrestri raccolte in 
gruppo. 

Con W sposti in alto la tua astronave 
con A la sostieni 

con D acceleri in avanti (essa si muove già di per sé in avanti) 

con X abbassi l’astronave 

con S sganci una bomba 

con SPACE fai fuoco col laster. 

Stai attento a non scontrarti con nessuno e cerca di evitare il fuoco della 
contraerea che ti viene indirizzato dalle basi di terra. 
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5 Lfì=l :F'OKE650., 255 

10 H=36878 : POKEH-i-1 , 8 : CO=30720 : CL=38400 
:SC=7680 

11 X=0 : V=5 : B=0 : S=@ 

12 OIMM C 3 > .. F C 3 > B C 3 > 

15 IFLR>3THENLR=1 : RESTORE 

16 OHLRGOTO20 - 55.. 100 

20 PRI NT " 1^*SP«H3 1 

MUST ‘ 

25 PRIHT"31,"1 ZIII ZMISMSlil I SUR I 91 

ima ; 

30 PR I NT " J3 1,-1 □ili ZIIISS9II I 9119 B 


35. PRIHT"liai ZTG" 

40 POKE38902..5 : POKE3890.35 : POKE38304.. 5 
: POKES182 ..124: P0KE8183 , 120 : POKES184.. 120 
45 PUKE7996+CU.. 3 : F'UKE7996.. 78 : P0KE7926+ 
CO.. 3 : P0KE792678 

50 POKES 140+CO , 3 : POKES 140.. 77 : POKE8070+ 
CO , 3 : POKE8070.. 101 : GOTO 150 
55 F'R I NT " 

VS ZÌI »3" 1T" ; 

60 PR I NT " . SIISI1711 ZÌI □RIISM3ffi*IP*SlL3 

I VII ZÌI ZÌI " ; 

65 PR I NT " aUiW’VS» iMKFJST ' 1 ; 

70 PR I NT " .Ef«invizi ZÌI ZI! " ; 


75 pRiNT"3i^a-v^aia»amMii " 

8 0 P 0 K E 8 011 + C 0.. 3 : P 0 K E8011 ,.77 : P 0 K E8024+ 
CO , 3 : POKE802477 

85 P0KE7959+C03 : P0KE7959 , 100 : P0KE7981 
+C 0.. 3 : P 0 K E7981.. 74 

98 POKE7920+CO.. 3 : POKE792077 : GOTO 158 

102 F'R I NT " VJ SII SII SII SIP.3 1**3 1*3" 
«Il ina SK"SlEfwZPuZIil W *3 1" ; 


105 pr i ht ■■ muirjiosi ziBV3irjiarwn 

Ilir3 ZÌI""; 


115 F'R I HT " jrOk&JOIBliUg^" 
150 FL=4:FI=4 


165 FORI=0TO3:F <I>=7767+1*44 :1FI = 1THEN 
F < I > =F C I !:■ -1 

170 IFI=2THENF<I>=F<I>-47 
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175 IFI=3THENFCI>=F<I>-44 
18© REflDB C I : M < I > =B < I. > : HEXI 

200 FORI --0TO3 

201 P0KESC+V # 2 2+K,32 :GETR$:IFB=0THENPO 
KEH-2,0 

205 H=H+1 + c: Rt= " R " *2- C R*= " D " > : IFHC0THE 
HX=0 

210 IFH>21THEHX=0:Lfl=LR+1 :GOTO15 

220 V=V+ < R$="M">-C R$=" X ">:IFVC0THEHV=0 

221 IFV>22THENV=22 

225 IFPEEK < SC+V*22+H>032THEH1000 
230 POKECL+V*22+X,2 :POKESC+Y#22+X,62 
235 IFF <I>=0THEM250 

240 POKEF<I>,32 :F <I> =F <I>-1 :1FF <I> <SCT 
HEHF (. I =F < I > +88 
245 POKECO+F < I > 1 : POKEF < I > , 60 
250 IFM I !:> =0THEN300 

255 I FM < I > =R < I > RNDRHD 1 > <. 90RB < I > =0THE 
H300 

260 POKEM < I > 32 : M < I > =M < I > -22 
265 I FM I > C7702THENPOKEM < I > , 32 : M < I > =B < 
I > : POKEM < I > +CO3 : POKEM < I > 30 : GOTO300 

270 POKEM c: I > +CO , 2 : POKEM I > -22+003 : POK 
EM < I , 22 : POKEM < I > -22,30 
300 IFfi$="S"RNDB=0THENB=SC+V#22+X+22 

355 IFB=0THEN40@ 

356 POK EHI, 5 : POKEH-2 , B,''25-75 

360 POKEB,32 :B=B+22.5:1FPEEK<B>032THE 
N365 

361 IFPEEK <B+1>=32THEN395 
363 B=B+1 

365 POKEH,15:POKEH-1,175 

366 P^PEEK t B !■' : 0=P E E K B+0 0 : P 0 K E B+0 0,2 : 
POKEB , 42 : B= I NT C B > : IFPO60THEN375 

370 FORJ=0TO3:1FF CJ >=BTHENF<J>=0 :P=32: 
8=8+20 :FI=FI-1 

371 NEKT :GOTO390 
375 IFPO30THEN385 

380 FORJ'=0TO3 :1 FB=M C J > -22THENP0KEM C J > , 
32 : M J > =B J > : P=32 : 8=8+10 

381 NEXT 

385 IFPO120THEM388 
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386 FORJ=@T03:1FB=BCJ>+22THENP0KEM<J >, 
32 : F'OKEM < J > -22, 32 : B C J !:< =0 : 8=8+30 

387 NEXT 

388 IFP=1010RP=770RF'=780RP=100THEMP=32 
:FL=FL-1 

388 IFP>72RHDP<760RP=85THEHS=S+50 :P=32 

390 I FP=81 THEHS=S+100: P=32 

391 IF P=88THENS=S+500 : POKEH+1, 25 : FGR J- 
1TO100 :NEXT:POKEH+1,8 :P=P+128 

392 FORJ=1TO10@:NEXT:POKEB,P : POKEB+CO, 
C:B=0:POKER-1,O:GOTO408 

395 IFB>8185THEHB-0:GOTO400 

396 POKEB+CO .ri : P 0 K E B , 4 6 
400 IFHfO" "THEN460 

4©1 POKEH,15 : FORX1=255TO230STEP-1 :POKE 
H-l,X1sNEXT 
405 X1 = 1NT <X+1> 

410 POKECL+V#22+X 1,7:1 FF'EEK < SC+V#22+X 1 
=32THEN440 

411 POKE36877,135 :P0KE36874,205 

415 F'~F'EEK SC+V#22+X1 > : P 0 K E 8 C+V # 2 2+X1 , 
42 

416 IFP=1010R P=7 7ORP=780RP100THENFL=FL 
-1 :P=32 

417 IFP>72RNDP<76ORP=85THENS=S+50 :P=32 

418 IFP=81THENS=S+100 :P=32 

420 FORJ=0TO3:1FF <J >=SC+V#22+X1THENF<J 
=0 : 8=S+2Gi : FI =F I -1 : P=32 

425 IFB J > +22=SC+V#22+X 1THENPOKEM C J > , 3 
2 : POKER ■:] J >-22,32 : B < J > =0 : 8=8+30 : F'=32 
430 IFM J > —22=8C+V#22+X1 THENPOKEM < J > , 3 
2 :M<J> =B <J >:8=8+10 : P=32 

435 NEXT 

436 P0KESC+V*22+X1,P:X1=X1-1 :G0T0445 

440 POKESC+V#22+X1,64 :X1=X1 + 1:1FX1C22T 
HEN410 

441 XI=22 

445 POKEH—4,0 :FORJ=X+1TOX1 :P0KESC+V#22 
+J,32 :NEXT:POKEH-1,0 
455 F=SC+1 NT RND < 1 > #330 > : I FF'EEK < F > 032 
RNDPEEK C F > O32THEN500 
460 NEXTI:IFFL=0THEN500 
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465 F=SC+1 NT < RND < 1 > *330 > : I FF'EEK < F > 032 
RNDF’EEK < F > O62THEN500 
485 POKEF+CO4 :F'OKEF , 42 : FORJ= 1T075 :NEX 
T:IFF=SC+V#22+XTHEN1000 
4 9 W P O K EIF., 3 2 

495 POKEF+CO , 4 s F'OKEF , 42 : FOR J= 1T075 : NEX 
T:IFF-SC+V*22+XTHEN1000 

496 F'OKEF, 32 

500 IFFI>0THEH200 

505 FOR I =0TO3 : F I > =7767+1 *44 :1FI = 1THEN 
F I > =F I > -1 

510 IFI=2THENF<I>=F <I>-47 
515 IFI =3THENF < I > =F <. I > -44 
520 NEKT:FI=4:GOTO200 

1000 POKE650,0 : POKEH-2, 128 : F'OKEH— 1 , 180 
: POKEH , .15 

1005 POKECL+V*22+X,2 :POKESC+V*22+X,42 
1010 FORI=1TO750:NEKT 
1015 F'R I NT " □FLINT I " S : POKEH , 0 
2000 DRTR79027972 r 8090.. 8161 .,7992,7976 
, 8023 .,7917., 8036., 8107,8110,7913 
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INVASORI DALLO SPAZIO 


Arresta la muraglia di extraterrestri prima che essi invadano il tuo pianeta. 
Hai a disposizione tre "vite”, quanto tempo pensi di resistere? 

Con Z vai a sinistra 
con C a destra 

con M fai fuoco col tuo cannone laser. 

Buona fortuna! 
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i ns=e 

5 SC=0 : B= 1 : F=0 :1 H=0 : GOSIJB1000 : G0T035 
8 FOR1 = 1T02000 : NEKT: IH=IH+1 :GOSUB1005 

35 IFF=1THEN505 

36 P0KE3687810 :P0KE36874., 132 

37 FOR.J=0TO2 
40 K=F‘EEK':: 137> 

45 IFK>32RHOK<35THEHGOSUB300 
50 IFSO0THEHGOSUB400 : GOTO 100 


16 




70 IFK=3 6 T H E N S=G—22 :GOSUB400 
100 GOSUB600 

200 NEXTJ:P0KE36874,0 :FORV=0TO3:FQRX=0 
T03 :1 FRZ < V , X > =0THEN250 
205 Z=RZ V , X > -7680 : Z1 = INT < Z/22 > : Z=Z-Z 1 
*22 

210 POKER": < V , X > , 32 : POKER": C V , X > +1, 32 

211 IFZ-X*4<10RZ-X*4>6THENDZ <V,X>=-DZ < 
V , X : RZ V, X !•' =RZ V , X ) +44 

215 RZ<V,X>=RZ<V,X>+DZ<V,X> 

217 P 0 K E R X <: VX >+C 0V+2 : P 0 K E R Z ■' VX > .r 2 5 5 

220 POKERZ < VX > +CO+1 , V+2 : POKERZ < V , X > +1 
.,127 

221 IFRZ<V,X>>8142THEN500 

225 K=PEEKC197 >: IFK>32RHDKC35THEHG0SUB 
300 

226 IFK=36RND8=0THEHS=G-22 
230 IFSO0THENGOSUB400 
235 C=C+1 

250 HEXTXV : I FC=0THEN8 

251 C—0 :F0RX=0TO3 :C=C+flZ'•!P0XsHEXTXsI 
FC=0THEMPO=PQ—1 :IFPOC0THEN8 

255 G0T035 

300 POKEG— 1,32 : POKEG+132 
305 G=G+<K=33>-CK=34 >:IFGC8143THEHG=81 
43 

310 IFG>8162THENG=8162 

315 POKEG-1+CO3 : POKEG-1,112: POKEG+CO , 
3 : POKEG,113:POKEG+CO+1,3 :POKEG+1,110 
320 RETURN 

400 POKES,32 :S=S-22:1FS<7680THEH8=0 :PO 
KE36877,6 :RETURN 

401 P0KE36877,153 :P0KE36878,6 
405 IFPEEK < S >032THEN415 

410 POKES+CO,5 :PUKE8,93 :G0TU465 

415 P0KE36877,175 :P0KE36878,15 

416 P=F'EEK <: S > : POKES+CO , 2 : POKES ,42:1 FP= 
160ORF'=95ORP= 105THEN460 

420 POKES-1,32 :POKES+1,32 

421 P0KE36878,15:P0KE36877,200 
425 I FP= 127ORF'=255THEN450 

430 FORX1=0TO2:1FS=SZC X1>THENSC=SC+5:S 
ZCX1>=0 
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435 NEXTX1 
440 GOTO460 

450 FORV1 =PHT03 : FORM 1 =0TO3 :1 FAX < V1, X1 > = 
SOR AX < V1 , X1 > +1 =STHENAX < V1, X1 > =0 : SC=SC+1 
0#C IN+1 
455 NEXTN1,V1 

460 POKES , 32 : S=0 : P0KE36877, 0 : P0KE36S78 
0 

465 RETURN 

50© FOR1 = 1TO1000 :HEXT 

501 PRI NT " □" : PO K E36878,42 : FRI NT " [3*** 

HI NVASIOHE! *** ":GOTO509 

505 P0KE36878,15:P0KE36877,150 :POKEG-1 
+CO,4 :POKEG+CO,4 :POKEG+1+CO,4 

506 P 0 K E G —1,223 :P0KEG,223 :P0KEG+1,223 : 
FOR1 = 1TO1000 :HEXT:P0KE36877,0 :P0KE36878 
,0 

507 B=B+1:1FBC4THENPOKE7680,B+48:F=0 : P 
0KE36877,0 : G0T035 

508 FORI = 1TO1000 :HEXT:PRINT :PRINT"3SEI 
MORTO ! " 

509 PRINT"fflkTUO PUHTEGGI0 :"SC:P0KE36 
877,0 :P0KE36878,0 

510 IFSOHSTHEHHS=SC 

511 PRINT"SPUHT. MAX.="HS 

513 PRINT 11 Ignara PREMI uh tasto per co 
NTIHUARE, LO jSSPAZIOS PER. FINIRE" 

514 GETAT : IF A*<> " " THEN514 

515 GETAT: IFfl$=""THEN515 
520 IFA*=" "THENEND 

525 SC=©:B=1 :F=0:1N=-1 :PRINT"□":G0T08 
600 IFSX J > >0THEN615 

605 88=INT CRND<1>*4 >: IFAX <PO,SS >=0THEN 
635 

610 SX < .J > =AX PO , SS > +22 

615 POKESX C J > , 32 : SX < J > =SX J > +22 :1FSX < J 
>8163THENSX < J > =0 : G0T0635 
620 IFPEEK<SX C J >> = 1120RPEEK<SX C J > > = 113 
ORF'EEK SX < ,T > > = 110THENF= 1 
625 IFPEEK <SX <J > > O32THENP0KESX<J>,32 : 
SX < .J > =0 

630 POKESX C J > +CO,3 :POKESXCJ >,93 
635 P0KE36877,6 :RETURN 
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1000 PRINT"3":C0=30720 :01MfìX<3,3 >,DXC3 
, 3 !> : G=8144 : P0KE36879 , 8 

1001 DINS’;<:2::> 

10Gì5 P0KEG+CO-1, 3 : P0KEG+C0,3 : P0KEG+C0+ 
1,3 : POKEG-1,112: POKEG, 113: POKEG+1,110 
1010 FORI =8164T08185 : POKEI+CO , 6 : F'OKE I , 
160:NEXT :P0=3 
1015 FORV=0TO3:FORX=0TO3 

1020 fi": V , X > =7681 +V*66+1 N$44+X#44 : DX < V 

, x :■= 1 

1021 HEXTX,V 

1022 IFIH>0THEN1051 

1025 FORV=8032TO8091STEP22:F0RX=2T0168 
TEF'7 

1030 POKEV+X+CO,7 :POKEV+X+1+00,7:POKEY 
+X+2+C0,7 

1035 POKE 1 V+X,160 :POKEV+X+1,160 :POKEV+X 
+2,160 
1040 HEXTX,V 

1045 F0RX=8100TO8115STEP7:POKEX+CO,7 : P 
0KEX+2+C0,7 

1050 POKEX,105 :POKEX+2,95 :HEXTX 

1051 FORX=0TO2:SX<X >=0 :HEXTX 

1052 POKE38400,1:POKE7680,B+48 
1055 FORI=1TO2000:HEXT:RETURN 
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AEREO 


Cerca di riportare a terra sani e salvi i tuoi passeggeri sulla pista dell’areo- 
porto di Heathrow. 

Quando comparirà 0 nell’indicatore di distanza sui pannello di strumenta¬ 
zione, vuol dire che sei arrivato alla pista. Bisogna fermarsi prima che il con¬ 
teggio arrivi a 200 (l’indicatore segnerà —200). 

Un altro numero indica il tuo grado di accelerazione: 0 significa che sta 
planando. Premendo la barra dello spazio vengono attivati i flaps di freno, 
mentre con S abbassi i carrelli; RETURN rialzerà i carrelli spegnendo auto¬ 
maticamente i freni. 

Con W innalzi la punta del tuo aereo 
con X l'abbassi 

con A e D modifichi la tua posizione in rapporto alla linea dell’orizzon¬ 
te; ciò può però anche essere alterato dall’effetto del vento. Tro¬ 
verai le indicazioni sulla linea immaginaria dell’orizzonte sulla 
destra del tuo pannello di controllo. 

Cerca di allenarti per un atterraggio perfetto. Buona fortuna! 



20 




1 P0KE36879,8 :PRINT"□":POKE650,255 
5 FORI =384001038906 : F'OKE I7 
10 \ '•■1E N T : P 0 K E36878 ,7 : P O K E36877, 18 0 
15 FORI=ITO13 

20 F’OKE7845+1 *22+1 /1.7,108 : P0KE7845+1 * 
22-1/1.7,123 

25 IFINT(I/2 >*2=ITHENP0KE7845+1*22,101 
30 NENT I 

35 PR I NT " SETv'ELOC ITR ' SIBBBBBBBBPLTEZZR 
■BBBBBBBPI STRHZfljaSSISISIBBBIBI" ; 

40 PRINT"m_" 

45 FOR 1 = 1 T014 SPRINT "111 HIIIIH ItllHH 

II I" 

50 NENT 

55 PR I NT " aiWIMHHIIIBMi ,-, RIABBI 

Il I I ZIBIBBI I ! &VBBBBI" ; 

60 PR I NT " I i SlflflBfll -■' " 

65 pr i nt " aaaaros i z i oneii" 

70 PR I NT " Èpos IZ. SlBBBBBICfiRRELL I : " 

75 D= I NT •:! RND < 1 > *500 > +1000 : H=3000+1 NT C R 
NO <1> *500—249 >:TH=0:fìB=0 
80 V=200 : F‘=0 : fl=0 : IJ=0 

100 D=D—V/24 :H=H-2+Cfl*V >/5:1FR=0THENH= 
H+V/200 

101 IFV>400THENV=400 

105 V=V-.5—U/20+CH<4>*2-RB*3:1FRND<1>> 
.95THENP=P+1NT <RND C1>*3-1> 

110 IFVC0THENV=0 

115 GETflT:fl=R-<R$="W"> + <RT="X"> 

128 IFRT=CHRT C 13 > THENU=0 : RE:=0 : P0KE3687 
7,180 

121 IFR$=" "THENRB=1 :P0KE36877,225 
125 IFR<—1THENR=-1 
130 IFR>1THENR=1 

135 V=V+TH: IFVRLCRf>>0ORR#="0"THENTH=V 
RL. C Ri-' > 

140 F'=P+ RT="R" >-CRT= "D" 

145 IFP<-1THENP=—1 

150 I FP> 1 THENF'= 1 

151 IFR*="S"THENU=1 

160 PR I NT " HBK.RL1 All!.{(!l^'' ; I NT < H > ; " Il " 

165 PR I NT " IBIMKLfeJUlBl" ; I NT < D > ; " Il " 


21 



I Ffì= 1 THENF'R I NT 


170 PRI NT " >W11IHWI" ; : 

II •» « 

**• .** 

175 I Ffi=0THEHPR I NT " - " ; 

18© I Ffi=-1 THENF’R I NT "; 

185 PR I NTCHRf < 28 > " -HD" 

190 PR I NT " SUUUUJPJJUU" ; : I FU=0THENF‘R I NT " 
DENTRO" 

195 I FIJ= 1 THENF’R I NT "FUORI ||" 

205 PR 1 NT " Siili 

■ Siili 

210 FRI NT ":OIII"; 

215 I FP= 1 THENF’R I NT " \ MBIK " 

220 IFP=0THENPRINT" SHU-" 

225 I FP=— 1 THENF'R I NT " 

235 IFH<1THEHH=0 

240 IF0>0fiN01-1=0THEN250 

241 IF V=© A N D H=@ T H E N 2 5 0 
245 IF0>-200THEN100 

250 8=100 :FOR1 = 1TO3000:HENT :PRINT"□" 
255 I FO>0THENPR I NT " Hfl I .MANCATO Lfì F'IST 
R":8=8-80 :GOTO300 

260 IFD<-500THENPRINT"HfiI OLTREPRSSRTO 
Lfl PISTR" : 8=8-68 :GOTO300 
265 IFPO0THENPRI NT " CON L " RLR HRI URTA 
TO IL SUOLO":8=8-50:G0TO300 
27© IF AC1THENPRINT"SEI ATTERRATO SULLA 
P ANCIA" : S=8-5 0 : G0T0380 
275 IFP<>0ANDH<4THENPRINT"LA PUNTA DEL 
L'ALA HA TOCCATO TERRA" :8=8-75 :GOTO308 
280 IFU=0THENPRINT"I CARRELLI ERANO RN 
CO-RR DENTRO":8=8-75:GOTO300 
285 IFV>10THENPRINT"TROPPO VELOCE !":8= 
8-25 :1FV>25THEHS=S—25 
290 I FS=100THENPRI NT " J3ATTERRAGG10 PERF 
ETTO !■" 

300 F'RINT"S1SL.ILTUO PUNTEGGIO E•' : "8" 13" 
305 FOLE36878,0 :POKE650,6 :END 
1000 FOR1=ITO13 

1005 P0KE7845+1 *22+1 /1.7108 : P0KE7845+ 
1*22-1/1.7., 123 

1010 IFINT <I/2 > *2=ITHENP0KE7845+1*22,1 
01 

1015 NEXT 


22 



MARATONA 


Siediti comodamente sulla tua poltrona di casa e scommetti sui più grandi 
atleti del mondo che si siano mai visti. 

Fai la tua puntata su uno dei tre atleti e osserva attentamente la gara. 
Quindi, se sei fortunato, incassa le vincite. 

Il gioco continua o finché non fallisci o finché fai saltare il banco. 

Sei in grado di indovinare chi vince tra quelli in pista? 



3 NO—180 

10 PRIHT''□lUÈH*#itSC0MMESSR ATLETICRii*+i*S" 
20 PP.INT"-" 

30 PRINT" BUC0ME TI CHIAH13" 

31 INPUT"HH ";AT 

32 FORI = 1T03;OD <I> = INT <RND<1>*6> +1 :NEX 
T 

35 F'R I NT " □" ; AT.? " , POSSI ED I " NO " $ " 

40 PRI NT : F'R I NT " ^.ATLETA : POSTA : " 

50 PR I NTCHR$ < 28 > " «jmmmmm 
60 PRINT : PRINT"1> SEB. 

COE • "OIIK 1 > ",-"l " 

70 PR I NT : PR I NT " ,g2 > STEVE 
OVET " OD 2 > " .•••1 " 
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en PRI NT : PRI NT " 33 > flLLRH 
WELLS " OD < 3 > " ,-l " 

90 PRINT" aW QIJRNTO SCOMMETTI"; 


100 I NF'UTB 

11© IFB>MOORB<0THEN100 

120 PRINT"Bk.CHE NUMERO Hfl L •' FlTLETFi ' 

130 INPUTR 

135 IFR<10RR>3THEN130 
200 PRINT"□":P0KE36879,170 


210 F0RI=1T022 

220 FORJ=76S0+1*22T07689+1*22-1 NT CI /2 . 
2> :POKEJ+30720,0 :POKEJ.- 102 :NEXT JI 
225 F0RI=1T022 


230 FOR J=7701 -i- I *22 > T07692+ < I *22 > +1 NT < 
I ■•••'2. 2 > STEP-1 : POKE J+30720,0 : F'OKEJ.- 102 : NE 
XTJ, I 


235 PRINT"i=iaS 
M0 FRINT"a 


**LR GRRR** 


250 F'R I NT " IUIIIIIJUUURI I" 

300 P0KE36874-128 : F'UKE36877.-12£! : FOR 1 = 1 
5T01STEP—1 : P0KE36878.-1 :FOR.J'=1TO20 sNEXTJ 
.-I 

310 P 0 K E36877.- 0 : P 0 K E36874.- 0 : P 0 K E36878 

0 

330 RP < 1 =8122 : RP < 2 >=8130 : RP < 3 > =8137 
340 FOR I = 1T03 : POKERP < I > .- 32 : POKERP < I > +1 


350 POKERP C I > +2.- 32 : POKERP < I > +23.- 32 
360 POKERP < I >+44.- 32 : POKERP C I >+4632 
370 POKERP <: I > -21.- 32 : HE NT I 
390 FOR1=1T03 

400 IF CRNDC1><-24RNDRND<1>*5<0D CI>>AND 
RND1 X. 43THEN410 

402 IFI = 1THENRP<1>=RP <I> +.5 

403 IFI =3THENRP < 3 > =RP •:! 3 > -. 5 

404 RF' I =RP •:! I > -22 
410 NEXTI 

415 FORI = 1T03:1FRP<I>C7897THEN1000 
450 NEXT 

540 FOR I = 1T03 : POKERP < I > +30720.-1 : POKERP 
< I , 252 : POKERP < I > +30721.-0: POKERP < I > + l.-1 
76+1 
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550 POKERP I > +30722 , 1 : POKERP < I > +2,254 : 
POKERP C I > +30743,8 : POKERP I > +23... 168 
560 POKERP I +30764 , 1 : POKERP < I > +44, 254 
: POKERP < I > +30766 , 1 : POKERP < I > +46, 252 
570 POKERP ci I > +30700 , 1 : POKERP C I >-21,31 : 
NEXTI 

580 P0KE36878,4 :P0KE36874,147 :P0KE3687 
7,140 :FORI = 1T065:NEXT:P0KE36874,8 :P0KE3 
6877,0 

581 P0KE36878,0 :GOTO340 

1000 FORZ=1TO1080 :NEXTZ:P0KE36879,8 

1001 J=I 

1010 PRINT"3a" 

1015 PRINT" jSHA VINTO 
1020 GOSUB1500 

1860 F'R I NT " iUSSTIJ AVEVI PUNTATO SU 

1078 I=R 

1080 GOSUB1500 

1100 IFJ=RTHENPRINT"ffiflakPRAVO, HAI VIN 
TO!!!■" 

1110 IFJORTHENPRINT"iJSH J34AI PER 

SO ! ! g J)I:HE SFORTUNA ! " 

1111 I FJORTHENMO=MO-B 

1112 IFJ=RTHENMO=MO+C OD<R>*B> 

1113 IFMO<1THEN2000 

1114 IFMO>20000THEN3©00 

1120 PRINT" MMBaP REMI RETURN" ; 

1130 INPUTAT 
1140 G0T032 

1500 IFI = 1THENPRI NT " 3SSEBASTI AH COE" 
1518 IFI =2THENPR I NT " ilSTEVE OVET" 

1528 IFI=3THEHPRINT’VALLAN WELLS" 

1550 RETURN 

2000 PPTNT" giada HAI PERSO TUTTO ! ! ■" 
2840 PR I NT " SUO IOCHI ANCORA ■:! S/N > " ; : INP 
UTm 

2060 I FLEFTf- < A$ , 1 > = " S " THENRUN 
2070 PRINT" SiaiUAO CIAOil" 

2080 END 

3000 PRINT’VHAI FATTO SALTARE IL BANCO 
! ! " 

3010 GOTO2040 
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STAR TREK 


Quale comandante dell’Enterprise, devi spazzar via dalla galassia le quin¬ 
dici astronavi Klingon. 

I comandi vanno inseriti come numeri. Essi sono: 

1. Direzione. Inserisci le coordinate del settore in cui desideri recarti come 
un numero di due cifre: prima la coordinata X, poi la Y. Per esempio 23 
(RETURN) per il settore 2,3. 

2. Il Radar analizza l’intera galassia suddivisa in una serie di settori 4x4. O- 
gni settore è identificato da un numero. La cifra che compare sulla destra 
indica quante stelle ci sono in quel particolare settore, mentre un’even¬ 
tuale cifra sulla sinistra rivela quante astronavi Klingon sono presenti nel 
settore. Se sulla sinistra c’è ancora un altro numero, esso ti indica il nu¬ 
mero di basi stellari che trovi sempre in quel settore. Così il numero 231 
significa: 1 stella, 3 Klingon e 2 basi stellari, mentre 25 significa 2 Klingon 
e 5 stelle. 

3. Siluri fotonici. Inserisci l’angolo di inclinazione per il lancio del siluro co¬ 
me un numero divisibile per 45; 90 per un lancio orizzontale alla destra 
della tua astronave, indicata con E sul display. Per un lancio in verticale 
inserisci 0 e non 360. Ricordati però che il numero di siluri è limitato. 

4. Fasori. Queste sono armi energetiche, ma non sempre distruggono i ber¬ 
sagli. L’angolo di lancio deve essere inserito come per i siluri. 

5. Barriere. Fissa, inserendo un numero intero, quanta energia vuoi usare 
sulle barriere di protezione. 

Più sono i comandi impartiti più si esaurisce l'energia. 

II gioco termina o quando l’energia è scesa a zero o quando hai distrutto 
tutte le astronavi Klingon. 

Puoi muoverti in giro per il settore usando i tasti per il controllo del curso¬ 
re, evitando le stelle (*) e i Klingon (+). Ciò può rendersi necessario per rag¬ 
giungere una buona posizione da cui distruggere i Klingon. 

Entrando in una base stellare si riempiranno i serbatoi di energia. 
AVVERTIMENTO-FINALE: un Klingon, se provocato, può anche far fuoco 
all'indietro. 
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1 X=RHDTI > :P0KE36879,8 

.10 DEFFNR < X > = I NT < RND < 1 > *X+1 > : E= 188 : S= 1 
80 :C=1 :X=2:V=2:X1=2 :V1=2 :T=5 

15 01 MGX < 4,4 > SX < 4,4 > 

20 FORI = 1TO20:R=FNRC4 >:B=FNR<4> : GXCfi,B 
y =GK fi r B '■ +1 : HEXT 

25 FOR I = 1TO20 : fi=FNR C 4 > : B=FWR < 4 > : GX C fiB 
> =GX fi , B > + 10: HEXT 

30 FOR 1 = 1 T02 : fi=FNR < 4 > : B=FNR <! 4 y : GX '•! fi .r B 
=GX <! fiB y +100 : HEXT 

50 SB= IHT GX < X , V > X100 > : KL= IHT C C GX < X , V > 
-SB* 100 > /10 > : Sfi=GX XV > - C SB* 100+KL* 10 > 

55 FORI = 1T04:FORJ=1T04:SX <I,J >=0 :HEXTJ 
, I 


56 

SX<X1 .Xt'I > = 1 



60 

IFSB=0THEH7@ 



65 

FOR1=1TOSB 



66 

fi=FHR < 4 >:B=FHR <4) 

' : IFSX<fì,B)' 

•O0THEH6 

67 

SX C fi .r B > =4 :HEXT 



70 

IFKL=0THEH8@ 



75 

FORI=1TOKL 



76 

fi=F H R £ 4 y : B—F H R 4 ) 

1 : IFSXCfì.rB:.' 

O0THEH7 

t' - 1 

SX fiB > =3 : HEXT 



80 

IFSfi=0THEH100 



85 

FORI=lTOSfi 



CO 

fl=FHR<4>:B=FHR<4) 

' : IFSX(fì.rB) 

O0THEH8 


87 SX fi B > =2 : HEXT 
100 F'R I HT " □^EHTERPRI SE3" 

104 E--E-SX10 ; SD=SD+1 :1 FK= 15THEH6000 
110 PRI HT " 1234 " : FOR I = 1T04 : F'R I HT I ; 


OR J= 
115 
120 
125 
130 
135 

140 

141 

142 

143 


1T04 

IFS 

IFS 

IFS 

IFS 

IFS 

HEX 

FOR 

IFS 

IFS 


( JI > =0THEHF'R I HT " k. " 
( J r I > = 1THEHPRI HT " h.E " 
C J , I =2THEHPR I HT " 3+ " 
X < J , I > -3THEHPRI HT " |!J+ " 
>: J , I =4THEHPR I HT " nix " 
r J : PR I HT " 3|" : HEXT I : C= 1 


I = 1T04 : FOR J= 1T04 :1F02THEH146 
X < -J .r I y =3THEHC=3 
J,I>=4THEHC=2 


F 
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144 IFEOTHENC=4 

145 NEXTJ,I 

146 PRI NT " 5)1:0ND I.Z I ONE : " ; 

1SO IFC=1THENPRINT"UVERDE" 

155 I FC=2THENPR I NT " iUAMBRA " 

160 I FC=3THENPR I NT'CHRT < 28 > " ROSSA " 

161 I FC=4THENPR I NT " iiCR ITICA " : GOTO5500 
165 PRINT"GENEROIA "; INT <E > 

170 FRINT"BARRIERE ";SSPRINT"SILURI 
" T : PR I NT " SETTORE " X " , " V 
181 PRINT"STELLA DATATA"SD+3200:PRINT" 
■KLINGONS RIMASTI"15-K:PRINT"COSA OROI 
NI?" 

190 GETAT:IFA$=""THEN190 
200 IFVAL < m >>0ANDVAL<A$>C9THEN250 
205 POKE7702+V1*22+X1+2,32 :SXCX1,V1>=0 
210 X1 =X 1 + < A$ = " Bi" >- C A$= " ||" > 

215 IFX1<1THENX1=1 
220 IFX1>4THENX1=4 

225 V1 = V1 + A*= " □" > - < A* = " H" > : IFV1 < 1 THEN 
V 1 = 1 

230 IFV1>4THENV1=4 

231 IFFEEK < 7702+V1 :+22+X 1 +2 > O32THEN500 

0 

235 POKE7702+V1*22+X1+2,5 :SX<X1,V1> = 1 : 
GOTO190 

250 ON V AL <AT>G0T0255,300,400,500,600 

251 GOTO.100 

255 PRINT"AVVIAMENTO MOTORI OK":PRINT" 
VERSO DOVE"; 

260 INPUTA:X=INT CA/10>:V=A-X#10:1FX<10 
RX>40RV<1ORV>4THEN260 
270 E=E—5 :X1=FNR<4 >:V1=FNR<4 >:GOTO50 
300 PRINT"31 1 2 3 4" : PRINT 

305 FORI = 1T04 : PR I NT I 

310 FORJ*1T04:PRINT" Ik? GX < J,I>; :IFGX<J 
,I>C100THENPRINT" "; : IFGX CJ,I> C10THEHPR 
IHT" 

320 NEXT : PR I NT " li" : NEXT 

325 PRI NT "ENTERPRISE NEL SETTORE" :PR 
INTX" , "Val" 

385 GETAT:IFA#=""THEN385 
390 GOTO100 
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400 IFT=0THENPRINT"CAMERE PRONTE":GOTO 
495 

404 T=T-1 :PRINT"CAMERE LANCIO SILURI 
PRONTE : ANGOLO" : INPUTfi 

405 IFI NT A/45 > *45OATHEN400 

410 A=A/45 :PRINT"TRAGOIA":TX=X1 :TV=V1 
420 PRINTTX","TV : IFSX < TX,TV >C2THEN450 

430 i fsx <: tx , tv = 2 thenpr i nt " stella colf 

ITA":G0T0435 

435 I FSX < TX , TV > =3THENPR I NT " KLINGON DIS 
TRIJTTO " : GX < X , V > =GX < X , V > -10: KL=KL— 1 : K=K+ 

1 

436 IFSXCTX,TV >=4THENGX < X,V >=GX<X,V >-1 

00 :PRINT"BASE STELLARE DISTRUTT 

A" 

440 SXCTX,TV > =0 :G0T0495 
450 TX=TX+ A=5 > + < A=6 > + < A=7 > — < A= 1 > — >■. A=2 
A=3> 

455 TV=TV+ A=0 > + C A= 1 > + C A=7 > - ■:! A=3 > - A=4 

- < A=5 > 

460 IFTV<00RTX<00RTX>40RTV>4THEN490 

465 GOTO420 

490 PRINT"MANCATO"; 

495 IFKL>@ANDFNR<20 >>1THENGOSUB 1 000 

498 GETAT : IFA$=""THEN498 

499 GOTO100 

500 PRINT"FASORI PRONTI: ANGOLO": INPUT 
A 

505 IFI NT A/45 > «45OATHEN505 

510 A=A/45 :TX=X1 :TV=V1 :E=E-10 

515 IFSX<TX,TV >C2THEN550 

530 IFSX<TX,TV >=2THENPRINT"COLFITA UNA 

STELLA":G0T0595 

534 IFSX CTX,TV > >3THENPRINT"BASE STELLA 
RE COLPITA" :G0T0595 

535 PRINT"COLFITO UN KLINGON":IFFNRC10 
>C5THEN595 

536 PRINT"E 01STRUTTO":KL=KL-1 :SX<TX,T 
V =0 : GX < XV ) =GX < X , V > -10: K=K+1 : G0T0595 

550 TX=TX+ < A=5 > + C A=6 > + ■:! A=7 > - A= 1 > - < A=2 

- <; A=3 > 

555 T V=T V+ < A=0 > + C A= 1 > + A=7 > - <■. A—3 > — < A=4 
>-C A=5> 
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560 I. F T V C © O R T V > 4 0 R T K < 0 0RTJO4THEN59 0 

565 G0T0515 

590 PRI NT " MRNCRTfl " ; 

595 IFKL>@fiNDFNR<10>>4THENG0SUB1000 

598 GETR* : IFA*=""THEH598 

599 GOTO100 

600 IMPUT"ENERGIR BRRRIERE";S: IFSC0ORS 
>100THEN600 

610 GOTO100 

1000 PRINT" s|IL KLINGON SPARA.. TU RESI 
STI":D=FNR<30 >+20-S/2:1FD<5THEND=5 

1015 PRINT"UNIT A r ORNNEGGIRTE"D:E=E-D: 
RETURN 

5000 IFSK < X1 , V1 > =4THENE= 100 : PR I NT " UJENT 
ERPRISE IN ATTRACCO":G0T0235 

5005 PRINT"ENTERPRISE IN COLLISIONE":G 
OTO5510 

5500 PRINT "ANCELLE-ENERGIA VUOTES3" 

5510 PRINT"HRI RNNIENTRTO"K:PRINT"KLIN 
GONS":PRINT"MA ESSI RI INVADERANNO LA GA 
LASSIR":GOTO6500 

6000 PRINT"HAI PORTATO A TERMINE LA MI 
SSIONE" 

6500 PRINT" HtìPUNTEGG10 : "<100-SD>*K 
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COMPUTER MAGICO 


Sei in grado di seguire la serie di BIP elettronici che il VIC ti fornisce?. 
Premi i tasti coi numeri rispettando l’ordine delle note della sequenza ge¬ 
nerata dal computer. 

Col procedere la sequenza diventa sempre più lunga. 

Sii veloce o il computer ti darà segni di disapprovazione. 



1 REM*C0MPUTER MAGICO* 

2 F'RINT"□" :P0KE36879, 158 

3 C0=3872©: L. 0=0 

9 PRINT'gM 

10 PRiNT"aa mr 

20 F'R I NT " US Hi*- ♦^COMPUTER»;** 


^a 


a " 

30 F'R I NT " Ha ;I#i3iaMflGICOBii*+B 


S" 


40 FRINT"Ha ■ 

45 FRINT"Ha B 

50 FRI NT "H2J BFsl- 

55 FRI NT "HJ3 B 
60 FRI NT "Ha Bi-■ 

—a " 


a " 
a " 

—i^a " 

a " 


-1 .—, !—1 Ji- 
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65 

FRI NT 

"zia 

■ 

Il 1 

12 | |3 | 

a " 

70 FRINT 

.a 1 " 

"zia 

n 

I5*i 1 

IM 1 

ia«>H i 

7Cr 

—a 

FRI NT 

M" 

"zia 

1 

il 

* ' 

il — m '—'lì*— ■ '—'m- 

80 
—a 

FRI NT 

II 

"zia 

1 

I 

1 

m ~~* '- J1 - 


85 

FRI NT 

"zia 

■ 

14 | 

I5| |6| 

a " 

90 

FRI NT 

"zia 

1 

iati i 

ia*a i 

ia*« i 


a i" 

95 FRI NT "Zltì SI- ■ <§-' i— 1 LJ -a- 

—53 


100 FRI NT "a "SII- mSF " 

110 friht" zia tsi- mw 

II 

120 frint" zia 'Sii- mw 

II 

130 fri nt" zia "Sii-lar 

II 

140 FRI NT "Zia ’Sii- mzw 

II 


150 FRI NT "Zia 

170 FORI =8142T08185 : POKEI+CO., 0 : POKE I , 1 
60:NEXT 

180 FOR J= 1T06 : REROR C ..T > : NEXTJ 
185 DRTR223,227,230 
190 DRTR231,234 ,236 

195 FORJ=1T09 : NO <J > = INT <RND<1>*6 > +1 :NE 
XTsNU=l 

200 P0KE3S878., 8 : FOR 1 = 1 TONO 
210 P0KE36875,R CNO <I>> 

212 ONNO C I > GOSIJB1800 .,110012001300 .,14 
00 ., 1500 

215 FORJ»1TO550:NEXTJ 

220 P0KE36875,0 :Z=1 : ONNO < I > GOSUB1000., 1 
100., 1200., 1300., 1400., 1500 : FOR J= 1TO125 : NEX 
T.J., I 

225 POKE 198., 0 
230 FOR1=1TONO 
235 FORJ=1TO170 

240 GETRt C I > : I FR$ ■:! I > O " " THEN300 
250 NEKTJ 
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260 P0KE36875,128 :FORJ=1TO1200 :NEXT:PO 
KE36875,0 

270 LO=LO+l:IFLO=5THEH2000 
280 GOTO195 

300 i fvrl <: m c i > > cno <: i > THEN 260 

305 P0KE36875 fi < VfiL < fi$ C I > > 

310 NEXTI 

320 FOR I = 1TO560 : NEXT : P0KE368750 

350 NU=HU+1 

360 FUR1 = 1T 0850 :NEXT 

365 IFNU=10THEH195 

370 GOTO200 

1000 P0KE7883+C0 Z : P0KE788381 
1010 RETURN 

1100 P0KE7889+C0,Z:P0KE7839,81 
1110 RETURN 

1200 P0KE7894+C0Z : P0KE783481 
1210 RETURN 

1300 P0KE7971 +00Z : P0KE7971,81 
1310 RETURN 

1400 P0KE7977+C0Z : P0KE737781 
1410 RETURN 

1500 P0KE7382+C0Z : P0KE738281 
1510 RETURN 

2000 P0KE368798 : F'R I NT " ZSHfi I SBfiGL I FlTO 
J35* VOLTE" 

2010 FRI NT"51-" 

2020 PRINT"a>3IOGHI fiNCORfi <S,-'N>?" 

2030 GETfiT:IFfi$=""THEN2030 

2040 I Ffi$= " S " THENRIJN 

2050 PR I NT " MMDaSB C I FIO ! 151" 

2060 END 
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ARTIGLIERE DI CODA 


Le astronavi nemiche ti hanno circondato e si ingrandiscono sempre di più 
avvicinandosi. Punta il mirino sulla loro torretta e spara prima che possano 
svignarsela. 

Con W sposti in alto il mirino 

con A lo sposti a sinistra 

con D a destra 

con X lo sposti in basso 

con S fai fuoco col tuo cannone fotonico 

Quante ne riesci a distruggere prima che le sei astronavi oltreppassino la 
tua rete difensiva? 



5 P 0 K E656255 

10 P0KE3S879,8 : PRI NT " 3BSgHaHaBB«ElMlll 

IWUU+ " 

15 DI fin 2 > , 8 <: 2 : FORI =0TO2 : fì C I > =7680+1N 
T PHD C 1 > *506 > 

20 S<I>=1:NEXT 

25 SC=7680:CL=38400:80=30720 :N=10 : V=10 
30 8=0 :PR=0 
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50 FORI--0TO2 

55 GETfì$:IFfì$=""THEH100 

60 POKESC+V*22+X, 32 : X=X+ •:! fl$= " fi " > - < Fi*-- " 
D " > 

65 V=V+ < fl$= " W " > - C RT= " X " > : I FVC0THENV=0 
70 IFV>22THEMV=22 ' 

75 IFX<0THENX=0 
80 IFX>21THEHX=21 

8 5 P 0 K E C L+V *22+X .r 1 : P 0 K E S C+V * 2 2+X .-91 
100 IFfì C I > =s0THEH 180 

105 fl=fì <I>:POKER,32 :POKER-1,32 :POKER+1 
,32 : POKEfì-21,32 :POKER-23,32 

106 POKEfì+21, 32 : POKER+23,32 

107 IFRHD<1>>.9THENS<I>=SCI> +1 

110 D= INTCRNO<1> *3+21>: IFRHD<1>>.5THEN 
D=-D 

115 R=fì+D : IFR<7703THEHR=R+450 
120 IFR>8162THENfì=fl-450 
125 R $ I> =fì;POKEfì+CO,4 :POKEfi+CO-1,4:POK 
ER+CO+1,4 :POKEfì+CO—21,4:P0KEfl+C0-23,4 
130 P0KER+C0+23,4 :P0KER+C0+21,4 
135 ONS I > GOTO 148,145,150,160,170 
14 0 P 0 K E fl , 4 6 : G 0 T0200 
145 POKER,87 :GOTO208 

150 POKER,87 :POKER-1,107 :POKER+1,115:G 
OTO200 

160 POKER,87 :POKER-1,107 :POKER+1,115 : P 
OKEfl-23,85 :POKEfì-21,73 
165 POKEfì+21,74:POKER+23,75 :GOTO200 
170 fì C .1 > =7680+1 NT C RND C 1 > *506 > : Pfì=Pfì+1 : 
sci::-=i 

175 IFPfì>5THEN1000 

176 GOTO200 

180 I FRHD •:! 1 > <. 9THEN200 
185 R < I> = INT CRND<1>*506>+7680 :S<I> = 1 

200 IFRIO " S " THEN300 

201 P0KE36878,10 :FORR=255TO200STEP-1 :P 
0KE36877,fl : NEXT:FORR=1TO100 :NEXT:P0KE36 
877,130 

202 POKE36878,15 

205 R=CL+V*22+X : POKER,7 :POKER-1,7:POKE 
fì+21,7 :POKEfì+22,7 
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210 POKER—22,7 :POKER-23,7 : POKER-21,7 :P 
OKEfì+23.,7 

215 R=SC+V#22+X sF0RJ=1T05 

220 OHJG0T0225., 230., 235., 240., 250 

225 POKER46 : P0KE36S77.,145: GOTO270 

230 POKER .431 : P0KE36S77 .,175: GOTO270 
235 POKER., 87 : P0KE3S877., 200 : GOTO270 
240 POKER , 73 : POKER-1., 85 : POKEfì+21 .,74 : PO 

KEfi+22,75 

245 P0KE36379., 25 : P0KE36877., 225 : GOTO270 
250 POKER., 32 : POKER-23., 85 : POKER-22., 64 : P 
OKER-21., 73 : P0KE36877,250 
255 POKER-1., 93 : POKEFI+1., 93 
260 POKER+21., 74 : POKEfì+22., 74 : POKER+23., 7 
5 

265 P0KE36873., 42 

270 FORK= 1T025+J4i 1G : NEXTK., J : P0KE36877., 

0 

275 P0KE36879., 8 : POKECL+V*22+N., 1 : POKESC 
+Vi*22+X .,91 

280 POKER-23., 32 : POKER-22., 32 : POKER-21., 3 
2 : POKER-1., 32 : POKER+1., 32 
285 POKEfì+21., 32 : POKEfì+22., 32 : POKER+23., 3 

290 FOEJ=0TO2 :1FROR C J > RHDR-1 OR < J > RHO 
R+21 OR <: J > RN0R+22OR < J > THEN235 

231 S=S+S<:J>i+:10 

232 POKER J > -1., 32 : POKER < J > -21., 32 : POKER 
J > -22., 32 : POKER <. J > -23., 32 

293 POKER < J > +1., 32 : POKER < J > +21., 32 : POKER 
■' J > +22., 32 : POKER J +23., 32 

294 R <J >=0 

295 NEKT 

300 NEXTI:GOTO50 


1000 POKE650., 0 : P0KE36879 .,27 


1005 FORI = 1TO1©00 :NEXT:PRINT" 
MM »»MI SEI MORTO!" 


1010 PR I NT " M«»g UNTEQG 10 " S " li" 

1015 FOR I =36874T036878 : F'OKE I., 0 : NEXT 
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GUERRE STELLARI 


Come nel gioco “Invasori dallo spazio”, devi impedire alla flotta di astro¬ 
navi nemiche di raggiungere la base dello schermo. 

Se riesci a fermare la prima ondata di invasione, subito ne scenderà una 
seconda e poi una terza. Quanti alieni riuscirai a distruggere prima della tua 
inevitabile morte? 

Con Z vai a sinistra 

con C a destra 

con M fai fuoco col laser 



10 POKE36879,8 :PRINT"□"; :CO=30720 
15 8=0 : P=8174 :W=0:L=1 
20 DIMA<3:5 

24 PR INTTAB C 16 > ; : FORI = 1T04-L : PR I NT " 

"::NENT 

25 FOR I =0TO3 : R < I > =7702+1 NT C RND C 1 > *22 > : 
IFIC3THENS •' I > =0 

30 NENTI 

35 C1 = 107 :C2=81 :C3=115 :N=4 

36 W=W+1sIFW>3THENW=l 

40 IFW=2THENC1=95 :C2=98:C3=105 
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45 IFW=3THENC1=32: C2=S8 : C3=32 
50 FORI=0TO2STEP2 :K=PEEK<197>:IFK=64TH 
ENI 00 

55 POKEP-1,32 : POKEP+1,32 : P=P+ < K=33 > - ■:! K 
=34 > 

60 IFPOB165THENF'=8165 
65 IFP>8184THEHP=8184 

-70 POKEP-1+CO,3 :POKEP+CO,3 :POKEP+1+CO, 
3 

75 POKEP-1,112 :POKEP,113:POKEP+1,110 
1 00 FORJ=ITGI +1 :1Ffl <J > =0THEN150 
105 POKER < J -1,32 : POKER< J > , 32 : POKER < J > 
+ 1,32 

110 R < J =R < J > +1 NT < RND < 1 > *3+21 > 

115 IFH < J> >8163THEN1000 
120 POKER<J >-1+CO,5 :POKER< J >+CO,1 :POKE 
R < J > +1+CO,5 

125 IFW=2THENP0KEfì<J >-1+CO,7 :POKER<J > + 
CO,2 :POKER <J > +1+CO,7 
130 I-FW=3THENP0KER < J > +CO , 2 
135 POKER <: J > -1 , C1 : POKER < J > , C2 : POKER < J > 
+1, C3 
150 NEXTJ 

155 IFKO36THEN200 

156 P0KE36878,12: FORX=255TO200STEP-1 :P 
0 K E36877 , X : N E X T 

160 FORX=P—22TO7702STEP-22 : POKEX+CO,7 : 
IFPEEK<X>=32THEN190 

161 POKE36878,15:P0KE36877,130 

165 P0KE36S79,40 :PGKEX-23+C0,1 :POKEX-2 
l+CO,1 :P0KEX+23+C0,1:P0KEX+21+C0,1 

166 PUKE36877,2wtì 

178 POKEX-23,127:POKEX-21,255 :POKEX,81 
:POKEX+23,127 :POKEX+21,255 
175 FORV=0TO3:1FR <V >=XTHENP0KEX-1,32 :P 
OKEX+1,32 :S=S+10*W:R <V>=0 :N=N-1 

180 I FR < V > OX+1 RNDfì < V > OX-1THEN185 

181 POKEX-1,32 : POKEX-2,32 :POKEX+1,32 :P 
OKEX+2,32 :R <V >=0 :S=S+5*U : N=N-1 

185 NEX'TV : POKEX-23,32 : POKEX-21 , 32 : POKE 
X+23,32 :POKEX+21,32 :P0KE36879,8 
18 6 P U K E36877,23 kf 
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190 POKEK , 93 : NEXTK : FORX=P-22TO7702STEP 
-22:POKEK.,32:HEKT 
195 POKE36877.,0 

200 NEKTI :PRINT"MSFUNTI"S: IFN>0THEH50 
205 G0T025 

1000 FORI = 1TO1000 :HEKT : L=L+1 :1FLC4THEN 
W==0 : PR IHT " □" ; : G0T024 

1001 F'OKE 1980 
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FLOTTA SPAZIALE 


Muoviti rapidamente nei cielo e annienta l'astronave extraterrestre prima 
che ti distrugga. Se entri in collisione con essa, la tua astronave comincerà a 
precipitare finché, una volta ferma, il gioco è terminato. Alla morte degli a- 
lieni sentirai il lamento delle forze di rimpiazzo che convergono nella zona di 
combattimento per prendere il loro posto. 

Con W muovi la tua astronave verso l'alto 
con A inverti la sua direzione 
con D la dirigi verso destra 
con X l'abbassi 

con S puoi sparare al nemico col laser. 



5 POKE650255 

10 F'R I NT " □" : P0KE36879,8 : FORI =8164T0818 
5 : POKEI +30720... 5 : POKEI104 : HEXT 
15 X=5:V=10 :0=1 : 8=0 :SC=7680:CL=384©0:R 
= 1 

20 01MX C 5 > , V C 5 > : FOR I =0TO5 : X < I > =99 : HEXT 
50 FOR I =0TO5 : GETR* : I FR$= " "FlHDD=0THEHPO 
KE368770 : GOT0100 
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51 P0KE36878,2 :P0KE36877,240 

55 P0KESC+V*22+X, 32 : X=X+D/R 

60 0=0+ < fi$= " fi " > - C Fi$= " D " > : I FD> 1 THEND= 1 

65 IFDC—1THEHD=-1 

70 V=V+ C fì$= " W " > - < Ft$= " X " > 

75 IFX<0THENX=21 
80 IFV<0THEHV=0 
85 IFX>21THENX=0 
90 IFV>21THENV=21 

95 POKECL+V*22+X,3 :C=107 :1FD=-1THEHC=1 
15 

96 IFPEEK <: SC+Y#22+X > =32THEH99 

97 R=R+1:POKE36876,250sFORL=lTO200:NEX 
T:P0KE 3 6876, 0 

98 P0K E C L+V $ 2 2+X .,2:1 FR>3THEN 1000 

99 POKESC+V*22+X, C 

100 I FHtO " S " THEH200 

101 P0KE36878,9 :FORD1=255TO230STEP-1 :P 
0KE36877,DI sNEXT 

105 D1=D:IFD1=0THENO1=1 
110 X 1 = 1 NT O-O 

115 X1 =X 1+D1 : POKECL+V#22+X 17 : P=PEEK < S 
C+V&22+X1>:IFP=32THEH150 
120 FOR J=0TO5 :1 FV=V •:! J > RHDX1 =X < J > THENX < 
J>=99:8=8+10 
125 HEXTJ 

130 P0KE36S78,15:P0KE36877,130 
145 GOTO155 

150 P0KESC+V#22+X1,64:1FX1<21RHDX1>0TH 
EHI 15 

155 F0RX2=INT <X >+01TOX1STERO1 :POKESC+V 
*22+X2,32:NEXT 
160 P0KE36877,0 
200 IFX CI> =99THEN250 

205 POKESC+V I > *22+X I > , 32 :1FRND C 1 > <. 4 
THEN225 

210 v i > =v <: i > + < v < i > >v > - <: v <: i > <:v 

215 X I !•' =X I + '•! X I '■* >X !•* — >•! X I *6X 
220 G0T0246 

225 X I > =X I > +1 NT C RNO < 1 > *3-1 > : V < I > = V C I 
>+INTERNO<1>*3-1> 

230 IFX <I>C0THENX<I>=21 
235 IFV I > <0THENV < I > =0 
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240 IFX C I > >21THENX < I > =0 

245 IFVCI>>21THENV<I>=21 

246 IFVCI>=VRNDX <I > = INT<X+.5> THENR=R+1 
: POKECL+V*22+X ..2:1 FR>3THEN 1000 

247 POKECL+V < I > *22+X < I > , 4 : POKESC+V C I > * 
22+X C I > .. SS 

250 I FX <: I O990RRND C 1 > <. 9THEN255 

251 X I > = I NT C RND C 1 > *22 > : V < I > = I NT < RND < 1 
>*21 > 


252 P0KE3S87S ..15: FORL=250TO 150STEP-1 : P 
0KE3S87S., L : NENT : P0KE36S76,. 0 
255 NEXTI:GOTO50 

1000 POKE650.. 0 : P0KE3S878.. 0 : P0KE36877.. 0 


1005 FORI = 1TO1000 : NEXT:PRINT" 
IMUF'UNT I " S 
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LABIRINTO TRIDIMENSIONALE 


Trova la giusta direzione all’interno del labirinto per trovare e raggiungere 
la stanza numero 25 nel minor tempo possibile. 

I corridoi sono in grafica tridimensionale. 

Col cursore di destra giri a destra, col cursore di sinistra invece giri a 
sinistra. Il tasto RETURN ti fa avanzare, se c’è un varco nella parete 
che ti sta di fornte. 

Riuscirci in meno di un minuto è davvero un buon risultato. 



10 P0KE36873,8 
15 DIMMT50,4> :FORI = 1TO50 
20 IFI > 1THEHMT < I , 4 > =M$ I -1 , 2 > : IFI >5THE 
NM*<I,3>=M*<I-5,1> 

25 m < I , 1 =STR* < IHT < RHD < 1 > *2 > > : MT < I , 2 > 
=STR$CIHTCRHD C1>*2 > > 

30 IFI = 1THEHMT C I , 3 > = " 0 " : M$ C I,. 4 > = " 0 " 

40 HEXTI :TI$="000000" 

45 P= IHTRHD•:! 1 > *50+1 > : IFP=25THEH45 
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50 F=VRL < m C F'1 > : R=VAL M# < P , 2 > > : B=VRL 

m <: p, 3 > > : l=val < m- < p, 4 > > 

60 D=1 

75 IFP=25THEN5000 

80 GOSUB1000 

35 GETR$:IFA$=""THEH35 

90 IF A* O " II" ANDATO " ||" THEH150 

95 I FAT= " II" THEH 120 

100 EX-F: F=L :L=B:B=R:R=EX 

105 D=D-1 :1FDC1THEND=4 

110 G08IJB1000 : GOTO 150 

120 EX=F:F=R:R=B : B=L:L=EK 

125 D=D+1 :1FD>4THEND=1 

130 GOSUB1000 

158 IFRTOCHRT < 13 > THEH85 

160 IFF=0THEH85 

165 F'=P+ 0=3 > — K 0= 1 > > #5+ 0=4 > — >■. Ct=2 ) 

170 IFP>5QTHENP=P—50 
175 IFPC1THEHF=P+50 
180 GOTO50 
1 000 pr i NT " 

1005 PR I NT " Sfifififififi»»»»»! filili 

li [amili i" 

1010 pRiMriuMmi [simili i 
■IIIIIR I" 

1 0 15 pr i nt " nMim a■ i-ailaiia■ l ai» 
.••-aii-airo: n i n r,r 
1020 pr i nt " »»►►►►»»►»»»»»r -.ji--. 


-MMIIIIIL_J" l M lfM M>l,,M>r 

1030 IFL=0THEN1050 

1035 PR I NT " SMUSSI SII Sili Siili [Siili 
I filili filili I" 

1040 F'R I NT " IMI filili [Siili filili B3 

mi fimi fimi isini r 

1045 print"iki ani an " 

1050 IFR=0THEN1070 

1055 PR I NT " all 

finn ani ani ani ani" ; 

1060 pr i nt " i ani ani ani an 

il ani ani ani ani ani"; 
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1065 PRINT" L?Iil B9II I" 

1070 PRIHT M aUUSTRHZn"P:RETURN 
5000 FORI = 1TO1000 : NEXT : PRI NT " nglBlPlglPlg»H 
Mimia jK BRRVO ! ■" 

5005 PR I NT " KEkJSCE L'HRI FRTTR DR SOLO* 

II 

5010 PRINT"aU TEMPO IMPIEGRTOffl" 

5015 T=VRL < TI* >:H=INT < 1/ 10000>:M=INT << 
T-H*10000 >/100):S=T-H#10000-M*100 
5020 PRINTH^REa" 

5025 PR INTM " MINUTI E aj" : PR INTS " SECOHDI " 


BRANDS HATCH 


Misura la tua abilità in pista cercando di evitare la collisione con i trenta 
bolidi o con le barriere laterali. 

Cerca di terminare la corsa senza romperti la testa o danneggiare l’auto. 
Avrai cosi una valutazione della tua prestazione. 

Troverai le istruzioni per.la corsa direttamente nel programma. 



45 




□SMS *** BRRH 


0 C= 12 : H=0 : F'R I NTCHR* C28 > 

DS HRTCH *** M" 

1 PRIHT"SMS U'/UO I LEK" : FRI NT" I 

STRUZI OH I C aSS/JSHS> " ; : INPUTfi* 

2 IFfi$="s"THEHGOSUB2000 

3 GOSUB2090 : PQKE36879... 92 : POKE650 , 128 : P 
UKE3687315 ;P0KE36874 r 128 :G0T07 

4 PRINT"□":FORI=1T023 

5 FRI NT" II" 

6 NEXTI:RETURN 

7 G0SIJB4 

10 FORL=1TO30 
25 R=7+1 NT •:! RND C 1 ) *7 > 

70 PR I NT " I^IgMBMglBMglBlBMBMBMg] 1 ' : PR IHTTRB < 

R>"l.a w B*M m " 

80 PR INTTRB C fi > " 1* j;j" CHR* < 28 > " OH ■" 

90 PR I NTTRB C fì > " ■ USI" CHRT < 28> " m4 " 

1 00 
1 1 0 
1 1 1 
120 
130 
140 
150 
170 
180 
191 

195 

ani! 

196 
200 
210 
220 
230 

•~i «~j Ej 

240 
250 
260 


*H" : IFDI >2THENPR I NT " IIUF'ER QUESTO LIVELL 
0" 

264 I FH= 1 THENF'R I NT " >»»t ***OK ! BRRVO*** " 

265 IFH>1RNDHC5THENPRINT"|*JMUU***N0N M 
RLE***" 


PR I NTTRB CR>" ^SUT 
FURZ=1rua+DI 

GETR'T : PR I NT " MMMM » TRE < C > " 

FRI NTTRB CO " 

PRINTTRB<C>" 

PRINTTRBCC+1>" " 

C=C+ < fì£= " Z " fi$= " M " > 

IFCC70RO14THENG0SUB1000 
PR I NT " Ì35MSI" TRB C C > " 

II" 

PRINT"S*"L"H"H 

F'R I NT " SilS" : PR I NTTRB < C > " ia "Sd*" 

PR I NTTRB <: C > " ■ a" CHR* < 28 > " o! 

PRINTTRBCC >"1 ha"CHRfC28 > " 

PR I NTTRB C C+1 > ";!a»*§!" 
PRINT"gHa"TRBCC>" 

GOSUB300 

NEXTZ,L 

PR I NT " Sl B MBMBli " 

IFH=0THENPRINT"***OTTIMO PILOTR!** 


■» 

■ 4 " 
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266 I FH>4RNDH< 3.1 THENF'R I NT " fcBKKI***P IVEL. 
LINO***" 

278 I FH> 1 ©THENF'R I NT " lllJ***Hfì , HR , HR ! ! ** 
*" 


275 FRI NT.; 

280 P 0 K E650... 0 
290 GOTO500 

300 P E=0 : P E=P E E K < 7 812+C> + P E E K 7835+C > + 
F'EEK C 7814+C > 

330 IFPE=96THENRETURN 


400 F'0KE36879 , 136 : P0KE36877248 : FOR 1=2 

51TO180 :P0KE36876,1 

401 FOR11 = 1TO200 ; NENT11,1 

402 F'R I NT " SaSS" TRB < C > " " : F'R I NTTFlE: < C- 

1 H" t" 

403 F'R I NT TRB < C-1 > " 83% " CHRf- < 28 > " O il |" 
487 F'R I NT TRE: < C-1 > " 3m m W» - 1 " 

410 P0KE36876,© : P0KE36877,140 :FORI = 15T 
G0STEP— 1 : F'OKE36878 , I : FORI 1 = 1 TO 100 : NE NT I 
1 , I 

430 P0KE36877,0 :P0KE36878,15 :P0KE36874 
, 128 : F'OKE36879,92 ;G0SUB4 ;H=H+1 ; RETURN 
508 P0KE368 74,0 s FOR 1 = 110800 : NENTI : F'R IN 

t " : pr i nt " mfeituaniF i n i sh«" 

510 F0RI=1T08 
520 RERDfì I ) 

538 NENTI 


550 DRTR223,227,230 
560 0RTR231,234,236 

578 DRTR238,239 _ 

588 FOR I =0TO8STEF'2 : P0KE36875 


Re! I > :GOSU 


B700:NENTI 

590 FORI = 1T03STEP2:P0KE36875,R e I>:GOSU 
B700-.NENTI 

600 FORI=8T01STEP-1 :P0KE36875,fl < I>:GO 
UB700 : NENT I ! PR I NT " □S" : P0KE36878,6 : F'OKE 
6875,0 

620 P 0 K E 6 5 8,0 s P 0 K E36374,8 ; F* U K E36879,27 
:POKE198,0:END 

700 FOR11=1TO350:NENT:RETURN 

10 0 <3 P 0 K E36877,2.13 : P 0 K E36875,288 : F 0 R J= 
1TO750:NENTJ:P0KE36875,0 :P0KE3S877,0 ;H= 
H+l 

1010 IFC<7THENC=7 
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1020 IFC>14THENC=14 
1030 G0SUB4:RETURN 

2000 F'R I NT " □30EVI SUPERARE 30 AUTO : ji?JF' 
IIJ' ALTO E " IL LIVEL—LO DI DIFFICOLTÀ^ 

Il 

2010 FRI NT "TANTO PILI'ALTA E r LA 
VELOCITA 1- 

2015 FRI NT"-" 

2035 INPUT " PREM I RETURN " ; A$ : F'R I NT " □" 

2040 FRI NT"-" :F'RI 

NT" CON 3Z1 VAI A SINISTRA CON .SM1 VAI 
A DESTRA." 

2045 FRI NT"-" 

2050 PRINTCHRT<28> "£]LA CIFRA IN ALTO A 
SI-NISTRA INDICA IL N. DI AUTO SORPASS 
A TE.. " 

2060 PRINT"S:*3UELLA A DESTRA IL N. 

DI CRASH." 

2070 PRINT"Hh.TI SCHIANTI SE URTI CON 
LA RUOTA UN'AUTO CHE TI VIENE INCOHTR 
0 " 

2080 PRINT"0 URTI COL BORDO DELLASTRAD 
A. " : I NPUT " PREM I RETURN " ,r A* : PR I NT " □" : RET 
LIRN 

2090 PR I NT " .BM H JSP IFFI COLTA ' : PR I NT " 

■>:: 1 -DI FF ICI LE 3-FACI LE > " 

2100 I NPUT " milllHH" ; DI : PR I NT " □" 
2110 IFDIC1ORDI>9THEN2100 
2120 RETURN 
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SAETTA DI FUOCO 


Una freccia ad alta energia discende dal cielo. 

Bisogna costruire una parete col cursore facendo in modo che la saetta 
l’attraversi. Se colpisce la parete si guadagnano preziosi punti. 

Attenzione, se si sorpassa la propria orbita o quella della cometa, si perde 
una delle cinque "vite” a disposizione. Inoltre la cometa può far fuoco col 
suo raggio laser, aprendosi un varco nella parete e magari attentando ad 
una delle tue vite. 

Con W muovi il cursore verso l’alto 
con A verso sinistra 
con D a destra 
con X in basso. 



5 HI =0 

10 S—0 :CO=30726 :SP=3:LI=5 ;F=0 
15 P0KE36879,S:P==7910 

20 PRI NT " □" : FORI =8164T08185 : F'OKE I+CO5 
: F'OKE I , 160 : HE NT 
25 L=7630+1NT<RHD<1>*22 > 

30 0= I NT RND < 1 !:■ *3-1 > s I FD==00RRND C 1 > >. 5T 
HEND=sD+22 
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35 C—33 s I FD=21 THENC-7'8 

49 IP" D=2 3 T H E N C=7 7 
45 IFDC20THENC-64 

50 F'OKELh-CO , 3 ; F'OKEL , C 

55 L=L+DsIFL>8163THEHS=S-10 :GOTO20 

56 IFLC7680THEHL=L+22 

57 I FF'EEK < L > = 168THENS=S+50 : GOTO30 

60 F'QKEL+CO .r 7 :POKEL,Sl 

61 FOR1=1TOSP 

65 K=PEEK 137 > ; IFKO17RNDKO18RNDK03R 
HDKO26THEH100 

70 POKEP+CO,4 :POKEP,160 :F'=F'+<K=17 > -<K= 
1Q > + C. K=3 — k K=26 ? ) #22 

71 8=8+1 

75 IFP>3164THEHP=P-22 : 3=8-1 
80 IFP<7680THENP=P+22;8=8+1 

85 I FF'EEK C P > =32THEN30 

86 LI =L I -1 : POKEP+CO , 7 : POKEP42 

87 P0KE36376,240 :P0KE36878,10:FORLI = 1T 
0100 :NEXT:P0KE36876,0 

88 GOTO 100 

30 POKEP+CO,2 :POKEP,31 
100 NEXT 

105 IFS>1000THEH8P=2 
110 IF 8 >5000T H E N 8 P = 1 

115 IFRWDC1><.35THEW200 

116 P0KE36S78,12 :F0RE=255T0210STEP-1 : P 
0 K E36877 , E : H E X T 

120 B=L:E=INT<RHD<1>*3-1>: IFP<BTHEWE=E 

125 IFP>BTHENE=E+22 

130 I F'flBS C E > <20THEHE=22 

135 B=B+E:B1=B:C1=33 :1FflBS<E >=23THENC1 


140 IFfiBSCE >=21THENC1=78 
145 IFflBSCE > = 1THENC1=64 

160 IFEO 8163THEH188 

161 IFBC7680THEH180 

162 POKEB+CO , 7 : F'OKEB , 81 
.1.65 IFBOPTHEN170 

166 LI=LI-1 :P0KE36876,175 : P0KE36878,15 
: FORL1 = 1TO100 :NEXT:P0KE36876,8 :GOTO180 
170 POKEB+CO , 5 : F'OKEB , C1 
175 E:=B+E : GOTO 168 
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180 B=B—E :FORI=B1TOBSTEPE;POKEI,32 :NEX 
T:POKE3S877,0 
200 IFSC-10THEN1000 
205 IFS>1000RHDF=0THEHLI=LI +1 :F=1 
210 IF S >5000R N D F= 1THEHLI =L I +1 : F^2 
215 IFS>10000R M0F=2T H E N LI=LI +1 :F=3 
220 IFLI<1THEN1000 
225 IFRND<1>>.7THEN30 
230 GOTO50 

1000 FOR I = 1TO2000 : NEXT : PRI NT " □fimSSUUUI 
PUNTI "S 

1.005 I FS>H ITHENHI =S : PR I NT s PR I NT "li HRI 
RERLIZZRTO IL MIGLIOR PUNTEGGIO !": 


GOTO1020 
1010 PEINT SPRINT 


: PR I NT " IF'UNT. MRK " HI 


1 020 PR I NT : PR I NT " ijJ3 1 OCHI RNCORR? " 
1025 GETRTsIFR$="V"THEN 10 
1 030 I FfifO " N " THEN 1 025 
1 035 PR I NT s PR I NT " sg JgC IRO ! ■" 


1050 POKE1880 
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UOVA SPAZIALI 


Misteriose uova piovono giù dal cielo, liberando a contatto col suolo dei 
grossi uccelli. 

Cosa sono queste strane creature? 

Le nuvole contengono un prezioso minerale di cui la tua compagnia cerca 
di impossessarsi. 

Disgraziatamente, gli uccelli di questo pianeta si nutrono proprio di questa 
sostanza e il tuo compito è allora quello di impedire che essi divorino tutto, 
annientandoli. 

Appena gli uccelli raggiungono le nuvole, mangiando parte del minerale, 
subito sganciano altre uova. 

Cerca allora di distruggerli prima che possano raggiungere le nuvole. 

Con Z sposti il fucile a sinistra 
con C a destra 
con M fai fuoco. 



5 PRI NT " agii D IFFI COLTA r " ; : I HPUTL.E : LE=L 
E— 1 

6 IFL E <00RLE>5 THEH5 

10 POKE36879,8 :PRINT"□":CO=30720:0=814 
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15 DI MB 5 > , D C 5 > : CL=22 : SC=0 

18 FORI =7680107701 ; F'OKE I+C03 : F'OKE I , 90 
: HENT 

19 F 0 R M Fi == 0 T 0 L E 

20 FORI=0TOWH:B <I>=7702+1HT CRHDC1> *22 > 
: D < I > =21 +1 NT RHD < 1 > *3 > 

25 HENTI 

35 FOR I =8164T08185 : F'OKE I +00,5 : F'OKE 1,16 
0 :HENT 

40 F'OKEG—1,112: F'OKEG ,113 : POKEG+1,110 

44 HR=Wft+1 

45 F0RJ=1T02 
50 FORI=0TOWfì 

55 IFB CI>=0THEH150 

60 F'OKEB <: I > , 32 :1FD C I > >0THEN70 

65 F'OKEB I > -1,32 : F'OKEB C I > +1,32 : F'OKEB C I 

> -22,32 : F'OKEB C I > -43,32 : F'OKEB C I > -45,32 

66 F'OKEB C I > -23,32 : F'OKEB C I > -21,32 : F'OKEB 
CI>-44,32 

67 I FD C I > >0RHDF'EEK C B C I > > O32THEH0 C I > = I 
HT CRHD C1> *3—23> 

70 B CI> =BCI> +DCI>: IFB CI> >8163THEHD<I> = 
IHT C RHD C1> *3-23 >:B CI> =BCI>+D CI> 

71 IFD CI> >0ORB<I> >=7746THEN76 

72 I FF'EEK C B C I > -44 > =32THEH74 

73 F'OKEB C I > -44,32 : CL=CL-1 

74 D CI> = IHT C RHD C1> *3+21>:B CI> = IHT C RHD C 

1> *22+7702 > 

75 IFDCIX0THEH100 

76 IFD CI>C0THEN100 

85 POKECO+BCI>,7 :POKEB<I>,81 
90 GOTO150 

100 F'OKEB C I > +00,7 : F'OKE E! C I > — 1 +00,7 : F'OKE 
B C I > +1 +00,7 : F'OKEB C I > —22+00,6 

105 F'OKEB C I > -23+00,5 : POKEB C I > -21 +0:0,5 : 
POKEBCI>-44+00,2 

106 F'OKEB C I > -43+00,5 : POKEB C I > -45+00,5 

110 POKEB CI>,113:POKEBCI>-1,85 :POKEB CI 

> +1,73 : F'OKEB C I > -22,102 
115 POKEBCI>-44,88 

120 OH.JGOTO 125,135 

125 POKEB CI>-23,105 :POKEB CI>-21,95 
130 GOTO150 

135 POKEB C I > -45,95 : F'OKEB C I > -43,105 
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158 IFCLC5THEN1808 

168 K=F'EEK C 197 > ; I FK<330RK>34THEN288 
165 POKEG-1,32 : F'OKEG , 32 : POKEG+1,32 : G=G 

170 I FF'EEK t: G-1 > O320RPEEK < G > O320RPEEK 
C G+1 >032THEH1818 

171 IFG<8143THENG=8143 

172 I FG>8161TFIENO=8161 

175 POKEG—1+COr1 ;P0KEG+C0,1 :P0KEG+1+C0 
, 1 

188 POKEG-1,112: POKEG,113 : POKEG+1,118 
288 IFKO36THEN250 

281 P0KE36878,15:FORL1=255TO230STEP-1s 
P 0 K E36877 , L. 1 : H E X T 
204 N-G-22 
285 POKEX+CO,7 

218 11~ F'EEK C X > O32THEHGOSUB308 : G0T0220 
211 POKEX,93 

215 X=X-22 :1FX>7679THEN205 

220 FORV=G—22TOXSTEP—22 : F'OKEV , 32 : NEXT 
225 P0KE36877,0 
250 NEXTI ,.J:IFNfi>0THEN45 
255 NEXTWfì 

260 141 = 1:GOTO1015 

308 I FF'EEK < X > =90THENGL=GL-1 :POKEX ,87 : G 
OSIJB450 : RETURN 

305 POKEX+CO,4 :POKEX+CO,4 ; P0KEX+C0+21, 
4 :P0KEX+C0+23,4 

310 P0KEX+C0--23,4 : P0KEX+C0-21 ,4 
315 POKEX,289 :POKEX+21,255 :POKEX+23,12 
r* 

320 POKEX—23,127:POKEX-21,255 

330 FORV—0TOWR : IFB C V > OXORO C V > C0THEN34 

0 

335 IFRND < 1 > >. 7THENB < V > =0 s NR=NR-1 : SC=S 
C+25:G08UB480 :G0T0340 

336 D < V = I NT C RND C 1 > *3-23 > : GOSUB450 : GOT 
0345 

340 I FB V > OXORD < V ) >0THEN345 

341 SC=SC+50:B CV>=0 :HR=NR-1 :GOSUB400 

342 POKEX-1,32 :POKEX+1,32 s POKEX-22,32 : 
POKEX—23,32 s POKEX-21,32 
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POKEX-45 


343 POKEX-4432 : F'OKEX-43,32 : 

345 NEXTV 

350 POKEX+21,32 :POKEX+23,32 :POKEX-23,3 
2 :POKEX—21 ,.32 
355 RETURN 

400 P0KE36378 , 15 : P0KE36876, 200 : FORL1 =2 
50TO150STEP5 

405 P0KE36877,LI :FORL2 = 150T01 '30 :PUKE36 
876,L2:NEXTL2,L1 
410 F'OKE36876,0 : P0KE36877,0 
415 RETURN 

450 P0KE36878,10 ;P0KE36875,145 :FORL1=2 
20T0255 

455 F’OKE36877 , L1 s P0KE36875,455-L1 :: NE NT 

460 P0KE36875,0 :PÙKE36877,0 

465 RETURN 

1800 NI=2 

1005 GOTO1015 

1010 MI=3 

1015 FOR1 = 1TO1000 sNEXT 
1020 PRI NT " □FLINT I " SO 

1025 I FU 1 = 1 THEHF'R I NT " [iISHfl I FERMATO LO 
STORMO" 

1030 IFWI.=2THENPRINT"|iH GLI UCCELLI 
HANNO DIVORATO LE NUVOLE" 

1035 IFMI =3THENF'RINT"UTI SEI SCONTRATO 
CON SJJN VOLATILE" 

1040 F'OKE 138,0 s END 
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XYLOID 


Digita questo programma e dagli il RUN. 

Lascia che il computer rallegri la tua vita con un disegno pieno di colori. È 
incredibile quante cose sappia fare il VIC. 

Questo programma fa uso di una routine grafica elaborata da Paul Wil¬ 
liams. 



1 DI MS 15 > T •:] 255 > : FORT=0TO 15 : REflDS < T > : 
T <S<T >>=T:NEXTT:T=0 

*2 DfìTfì32 , 1 23, 1 26,97 , 1 08,98 , 1 27,252, 1 24 
, 255, 226 ,236225,254,251,160 
5 P0KE36879,8 :PRINT"□" 

10 X=-10 :V=10 :CL=INT<RND<1> +7+1> 

15 DV=INTCRND<1>*3-1> : DX=INT < RND C1>*3- 
1 > 

20 X=X+DX:V=V+DV:GOSUB1000 
25 X=X+20:GOSUB1000 :V=V-24:GOSUB1000 
30 X=X—20 :GOSUB1000 :V=V+24 
35 IFRND C 1 :> >. 9THEN0V= I NT < RND < 1 > *3-1 > : D 
X= I NT C RND <: 1 ì *3-1 > : CL= I NT C RND C 1 > *7+1 > 
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48 IFK<—19ORK>0THENDK=-DK 
45 IFV<10RV>20THEH0V=—DV 
50 GOTO20 

1000 S=7911 + K/2 — I NT V/2 !> #22 : C=S+3072 

0 

1010 POKES S < T PEEK C S > > OR < 2T < C K/2-1 NT 
K/2 ) #4+ < C V/2-1 NT < V/2 > > #2 > T2 > > > 

1015 POKEC,CL:RETURN 


GOMOKU 


Una versione per il VIC dell’antico gioco orientale. 

I livelli 3 e 4 sono i più difficili, con gli altri puoi vincere facilmente. Inseri¬ 
sci i movimenti nella forma: coordinata X virgola coordinata Y. Ad esempio 
2,3. 

Cerca di porre cinque pietre su una fila prima che lo faccia il tuo avversa¬ 
rio. ATTENZIONE questo programma richiede alcuni minuti per elaborare la 
mossa. 
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I GQSUB1000 

5 GOSUB200 

6 G O SIJ B10 0 ; G 0 T 0 6 7 
10 HI=0:W=0 

II GC=GC+1 

15 V= 1 

16 X=1 

17 IFWO0THEN500 

20 IFBX C V , X O0ORF= 1THEH65 

21 DF=-5 

22 HL=5sIFGC<5THEHHL=GC 

25 TH=0:F0RL-HLT0LESTEP-1 : FORP=—1TO1ST 
EF'2 

30 IFTHO0THEN55 

35 FORD-0TO7; IFXXCD>fcL+XC1ORXXCD>*L+X> 
10THEH5Q 

40 IF VX <: D *L+V< 1 OR VX C D > *L+V> 10THEH50 

41 IFTHO0THEN50 


45 

GQSUB2000 



50 

NEXTD 
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NEXTP,L 



60 

I FfìBS < TH > I> 

FIBSCHI >THENHI = 

TH :H'i 

61 

IFRBS TH > = 

HITHENHI=TH:HV 

=V M 

65 

X-X+l:IFX< 

11THEN20 


66 

V-V+ 1 ; I F't'< 

11THEN16 


67 

IFHI=0THENGOSUB100 


71 

BX C HV r HX = 

-1sP=-l 


r* cd 

GOSUB5000 



"7 ET 

1 •_* 

INPUTHX... HV 

: P-1 


7 & 

IFHXCIORHX 

>10ORHVC1ORHV> 

10THE 

r* i‘‘ 

IFBX < HVHX 

> O0THEN75 


79 

GOSUB5000 



80 

BX HV ,r HX > = 

1 : F'R I NT " OK " 


85 

GOTO 10 




100 C=0 

105 HV= I NT C RNO C 1 > * 10+1 > : HX= I NT < RND C 1 > * 
10 + 1 > 

110 C-C+l 

111 IFC>400THENW=1 ;GOTO500 
115 IFBX C H V , HX > O0THEN105 
120 HI=9:RETURN 


58 




200 F'R I NT " □ 12345678910 " : FORI = 1TO10 : 

FRI NT I; 

205 IFI<10THENPRINT" 

210 PRI NT " IH-H-H-H4-H-" 

215 NENTI:RETURN 

500 IFW=—1THENGOSUB5000:PRINT"HO VIHTO 

I " r 

505 I £u= 1 THENF'R I NT " HHI VINTO ! " 

510 END 

1000 PRINT"3B 8.U330-M0KUjiiHìg '' 

1005 v% <: 0 =~1 ; xx <: 0 > =0 : vx <: 1 > =-1 : xx c 1 > = 1 

: VX C 2 > =0 : XX 2 ì = 1 

1010 VK 3 = 1 : XX C 3 -1 : VX C 4 > = 1 s XX < 4 > =0 : V 
X <: 5 = 1 : XX >: 5 > =-1 

1015 VX <: 6 =0 : XX < 6 >=-1 : VX C 7 > =-1 s XX < 7 > =- 

1 

1020 PRINT" DIFFICOLTA' <1-4 >"; : INPUTL 

E : IFLE C10RLE>4THEN1020 
1025 LE=5-LE:GC=0 

1030 PRINT"3":RETURN 
2000 NP=0:DI=1 

2005 I FBX <: V+VX C D > *01 , r X+XX C D > *D I > =PTHEN 
NP=HP+1 

2010 IFNPCDITHEN2025 

2015 DI =DI +1 :1FDIOLTHEN2005 

2020 IFNPOLTHEN2025 

2021 TH=NP*P:IFP=1RNDCD-4=DF OR DF-4=D 
)THENTH=TH+2 

2022 IFNP=4flNDP=-1THENW=P 

2023 I FNF'=5RNDF'= 1 THENW=P 
2025 IFNP>0RNDP=1THENDF=D 
2030 RETURN 

5000 00=81 : CL=0 :1 FF'= 1 THENCL=6 :00=87 
5005 F'0KE38400+HV#22+HX+2,CL :PURE768W+ 
HV+22+HX+20 0 

5010 F'R I NT " agBMBMBMeMglBMBM III 

IMHIIIIIIIillHII :xi" 

5015 RETURN 
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ATTERRAGGIO LUNARE 


Scegli uno dei tre luoghi d’atterraggio e guida il tuo fragile modulo lunare 
fino ad un sicuro atterraggio. Si guadagna un diverso numero di punti a se¬ 
conda del tipo di luogo. In particolare verranno assegnati metà punti se l’at¬ 
terraggio risulterà difficoltoso, nessuno per un urto. 

Con Z ci si muove a sinistra 

con C a destra 

con M si solleva il modulo. 

Il movimento continua finché non viene invertito dalla forza di gravità o da 
una spinta in senso contrario. 

Avvicinandoci al punto di atterraggio di colpo la visuale si restringe alla 
base interessata. I punti di atterraggio sono rappresentati da linee verdi nel¬ 
l'immagine a largo campo. 

Sei capace di atterrare nel luogo più impervio per 150 punti?. 
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10 SC=7680 :00=38400 :8=0 
15 P0KE368798 : DV=0 : DX=. 1 ; V=0 : X=0 

2@ F'R I NT " ^i|^9KMIIl!!JfeJl!LlfclllUP.IC!JfclLllBLlUUUII.Il!A.BUU [fili W 
11.21 ai ani " 


24 

F'R I NT " !H 23 ~ 

TL 


•~icr 

F'R I NT "□.Él 

1 


30 

FRI NT "Zia 

"S 

J 

35 

PRi nt" zia 

e 

li 

40 

M 

F'R i nt "ma 

■ 

a 

45 

FRI NT "Zia 

a 

la 

50 

FRI NT "Zia 

H 

231 

55 

FRI NT "Zia 

a 

a 

60 

FRI NT "Zia 

s 

ta 

65 

FRI NT "Zia 

s 

la 

70 

FRI NT "Zia 

s 

a 1 

■ •_< 

FRI NT "Zia 

a 

ai 

80 

FRI NT "Zia 

Elamita 

85 

FRI NT "Zia 



90 

FRI NT "Zia 

ii 


95 

FORI=8 1 20TO8 1 85 5 POKE 


tiLM 

Sm .23 

3 a. sr 

3 1 .23 

Siimil23 


■ 2 :POKEI 


, 160:NEXT 
39 FRINT"3" 

100 POKESC+1HTC V >*22+X,32 
105 V=V+DV :X=X+DX: IFX>21THENX=0 
110 IFX<0THENX=21 

115 IFV<0THENV=8 

116 I FF'EEK C 80+1 HT C V > *22+X >032THEN1000 

117 IFV>10RHDXC10THEH200 


118 IFV>5flNDX>=10.5fiNDXC=16THEN400 
120 POKECO+1 NT V > *22+X , 3 
125 POKESC+1NT< V >*22+X,88 
130 DV=DV+.02 : K=PEEK<197 > 

135 DV=DV+ < K=36 > /8+ C < K=33 > + < K=34 > > /20 
140 DX=DX+ < K=34 > - C K=33 > > /10 
145 GOTO100 

200 V1=V :X1=X:V=0:X=CX-5>*4+1NT <RND<1> 
*6 y : F'0= 100 
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205 

PRINT"3i 



a " 

210 

PRI NT " 



sr " 

215 

PRINT"3a 

a 


" 

220 

PRINT"3fl 

m 


la " 

225 

PRINT"3sa 

pR 


ai 

230 

PR!NT"US 

m 


mia II 

jiaS 

235 

pr i nt " zia 

H 


ai 

240 

PEINT"Ua 

m 


.ai 

245 

F’RINT"HJ3 

a 


a 

250 

PRINT " □tì 


I 

Si 

255 

PRINT"Zfi| 


ai 

a 

260 

PRINT"3a 


a 

.ai 

265 

pr i nt" ma 


a 

a 

270 

PRINT"GH 


a 

.a 

275 

pRiNT"aa 



ar 

280 

PR I NT " Z13 


W~ 

sr 

285 

PRINT"Da 


a 

m.tt 

290 

PRINT"3a 


m 

~a 

295 

PRINT"33 


m~ 

sr 

300 

PRINT-D3 


ai 

>i ii 

.Ibii 

305 

PR I NT " □J3I 

II 


animarsi 

ai ^acjuiia 

310 

II 

PRINT"Da 


MM "««SI 

li 

315 

FORI =816: 

3TO 

3185 ;POKEI + 

30720,4 ;POKE 

16 

0 :NENT :PR 

INT 

i ' Ì“>] 11 


320 

F'=SC+1 NT 

V 

+22+N : F’OKEP 

,r 3 2 : P 0 K E P+2 2 

:-!k! n 

: 'OKEF'+23 

32 : 

POKEP+21,32 


325 

X=X+DX:V 

=V+DV 



326 IF CVCORNODVC-.5>ORK<1ORK>20THENV=V 
1-1 :X=X1 ."GOTO20 

327 IFV<0THEHV=0 

329 P=SC+1NT <V> #22+X 

330 I FF'EEK < P+21 > = 104ORPEEK < P+22 > = 104OR 
PEEK <: P+23 > = 104THEN800 

335 I FF'EEK < P > O320RPEEK < P+21 > O320RPEE 
K < P+22 > O320RPEEK < P+23 >032THEN1000 
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3 4 @ P=P—S C : P 0 K E P+C 0 3 : P O K E P+C 0+21 3 : P 0 
l< E P+2 2+C 0 3 : P 0 K E P+C 0+2 3 .r 3 
345 P=P+SC : POKER81 : POKEP+21 ,85 : POKEP+ 
22.-249 : P 0 K E P+2 3 .r 7 3 
350 DV=DV+.02 ;K=PEEK <197> 

355 D V=D V + K=3 6 > / 8 + <■. <■. K=3 3 > + < K=3 4 > >2 0 
360 DK-DX+< '■ K=34 > - < K=33 > >/10 
365 GOTO320 


480 

V1=V: X1=X : V=0 : : 

: != < X-8 > 5f 

2+1NT- 

:rhd<i 

4 Pi 5 

nPO=50 

F'F' T NT " rr ìiffPJPlPlPjPlP] 

SSrJ tram 

.Jia-JP :• 



i sma ims " 

HJLh3 haelr.-:- 


410 

FRI NT "«a" 

m 

■«a 


415 

pri ht "rju.gr 

B 

a 

m " 

420 

PRINT"3ja“ 

■ 

la 

n 

425 

PRINT"3JSr 

B 

a 

ii 

438 

PRINT"ZHa 

■ 


ii 

435 

PRINT"3a 

M 

a 

ii 

440 

FRINT"Ha 

B 

la 

ii 

445 

PRINT"3a 

m 

la 

ii 

450 

pr i ht " ma 

m 

la 

n 

455 

F'R I NT " US 

m 

m 

ii 

4- ò y 

pRiNT" na 

B 

.Ed 

ii 

465 

F'R I NT " Zia 

B 

’ia 

ii 

470 

pr i ht " na 

B 

s 

ii 

475 

pr i nt " na 

B 

^a 

ii 

480 

pr i nt " na 

B 

a 

" 

485 

pr i nt " na 

H 

ai 

ii 

490 

i 

FRINT"□a 

■ il rm 

ai’** 

495 

pr i nt " na 

m 

a- 

:iiar il 


II 


500 FORI =7897T08185 : PQKEI +307284 : POKE 
I .- 160 : NEXT : PRI NT " j=3" : F'OKES 174101 : P0KE81 
75 .,229 
505 GOTO320 

800 I FF'EEK P+21 > C> 104ORPEEK < F'+22 > O104 
ORF'EEK < P+23 > <> 104THEN1000 

803 IFV>7RNDPO=50THENPO=150 

804 IFRBS<DX>>.50RRBS<DV> >.6THEN1000 

805 I FRBS DX > >. 20RRBS < DV>. 35 > THEN850 
807 S-S+F'O 
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S10 PPTUT 11 -pT ijlslPM^MPl gia m =»1 ►»» » 1 :1 K BRAVO! 

Il 

SI5 GOTO90Q 

O DURO" 

855 S=S+P0/2 

900 PRI NT " TWHHP UHTI " S " £3“ 

905 PGKE3S87S ,7 :FOR1 = 158T0255:P0KE3687 
6,.-1 : N E K T : P O K E 3 S 8 7 <S0 5 P 0 K E 3 6 S 7 S, 0 : G 0 T 010 
15 

1000 POKECO+1 NT C V *22+7 r 7 ; POKESC+1 NT C V 
>*22+7,42 ; P0KE36879,24 
1010 P0KE3S877,220 :FORI = 15TO0STEP-.08 : 
P0KE36878... I :NE7T : POKE36877, 0 
1015 POKE198,0 
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BASE MISSILISTICA 


In qualità di supremo comandante dei sistemi di difesa della Terra, devi 
impedire ai missili di invasione di raggiungere il suolo. 

Sposta il mirino sullo schermo e lancia i tuoi missili per intercettare al mo¬ 
mento giusto quelli nemici. 

Sta attento però, hai solo un numero limitato di proiettili. 

Il gioco terminerà se sarai riuscito ad arrestare l’invasore o se sei missili 
avranno raggiunto il suolo. 

Con W sposti in alto il mirino 

con A lo sposti a sinistra 

con D a destra 

con X in basso 

con S lanci il missile. 

La Terra è nelle tue mani. 



1 P0KE36879,8 

5 PRIHT":JJ***BRSE MISSILISTICA**" :PRIH 
T : PR IMT" s| DIFFI COLTA r < 2-7 > " ; 

6 I NF'UTSK : IFSK<2ORSK>7THEN5 
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10 PRI NT "□" :SH=0 :FORI =8142T08163 :F'OKEI 
, 166 ; POKEI +30720,5 :: NE NT 
15 F'=— 1 ; C0=30720 : X= 10 :: V= 11 : CI =0 : SC=8 
20 FORU=1TOSK:NO=~1 :P=-1 :SH=0:MI = 15+1N 
T<SK/2> 


22 FORI=0TO5:PX<I>=0 : XXCI> = 10: VX<I> 
:NEXTI 

25 FOR I =81S4T08185 : F'OKE I+CO , 5 : F'OKE I 
0 : NEXT I : POKE38843,3 : POKE38850... 3 : F'OKE 
51 , 3 


19 


26 F'OKES 129112: P0KE8130 , 1 13 : P0KE8131 
110 

30 FORI=OTOH :MX CI>=7680+1NT CRND<1>*22 > 
: SX C I = MX < I > : DX < I > = I NT < RND < 1 > *3+21 > 


35 NEXTI 

50 IFSK>4THEN53 

!”i 1 F URI = 0 TU8K :OUTU54 

53 FORI=0TOW 

54 IFMX I > =0OR I >WTHEN 100 

55 GR=0:C=93 

56 IFDXCI>=21THENC=78 

57 I FDX I > =23THENC=77 

58 F'OKENX < I > +CO... 7 : F'OKEMX < I > , C 

59 MX I > =MX C I > +DX C I > : I FMX < I > <81S6THEN6 
5 

60 G0SUB2000:MXCI>=7680+INT<!RND<1 >*22> 
:SX<I>=MXCI>:DX CI> = I NT CRND C1>*3+21>:GOT 
0100 

65 I FF'EEK C MX < I > > O32THENG0SUB1000 :1FGR 
=1THEN100 

70 F'OKEMX I > +C0,2 : F'OKEMX C I > 42 


100 

K= 

F'EEKC 197> 

: IFK=640RK=41THEN1 

59 

101 

IF 

SH = 1 AND K 

:= 170RK= 180RK=30RK= 

26>TH 

ENSH= 

=0 s 

GOTO 110 



105 

P 0 K E7680+V * 

22+X,32 


1 10 

x= 

X + K = 17 > - 

CK=18 > 


115 

v= 

V+ <. K=9 > - < 

K=26 y 


120 

IF 

X<0THENX= 

0 


125 

IF 

X>21THENX 

=21 


130 

IF 

VC1THENV= 

1 


135 

IF 

V>19THENV 

= 19 


140 

F' U K E •-* a *4 y 0+V 

*22+X,3 :P0KE7680+V ; 

*22+X 


,91 
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158 IFP=—1THEH205 

155 F 0 R J=0 T 0 5 :1F P X < J > = 0 T H E H 2 0 0 

160 P0KE768vii+VX CJ > #22+XX ■ J !•' ,32 


165 YX( 

: j > =' t'x ( 

; J + VX < .J > >T VX C 

: .j 

TVXCJ>> 




170 xr:>: 


:j> + -::xx<: j>>txx< 

: j 

TXXCJ>> 





175 IFXX C J > =TXX C J > AND 1 VX C J > =T 'VX < J > THENG 
0SUB3000 :GOTO200 

180 P 0 K E38400+V X <■'. J > #22+X X <! J 3 1 ,7 ; P 0 K E 7 6 8 


0+VX 

: J >#22 

+XK < 

J> ,46 



288 

NEXTJ 





205 

IFKO 

41THEN220 - 



210 

IFF'=5 

ORP= 

—2THEN220 


211 

I FF’X •: 

P+l 

= 1THENF': 

=P+1 : 

30T0217 

215 

p=p+1 

:PXC 

P > = 1 : TX' 

;<p>= 

K : TVX C P > =sV : SH 

= 1 :F'i: 

3KE38400+X 

+V#22,2 



216 

POKEC 

6878 

, 5 : POKEC 

36877 

,250 


217 IFP>5THENP=0 
220 IFCI>5THEN4000 

222 IFCI>5THEH4000 

223 IFP=—2THEN225 

224 P0KE38849,3 :P0KE38858,3 :P0KE38851, 
3 r. P0KE8129,112: P0KE8130,113 : F'OKES 131,11 
0 

225 NEXTI: IFH0<WTHEH50 
230 NEXTW 

240 PRINT"apK BRAVO! HAI FERMATO 
L-" INVASI OHE" 

245 F'R I NT JgPUNTEGG 10 : " SC#SK " ■" 

250 PRINT"aMISSILI ARRIVATI"CI 
260 PRINT"SJ_IV. DI DIFFICOLTA'"SK 

999 P 0 K E36878,0 ; P 0 K E36877,8 : P 01< E19 8,0 : 
GOTO5000 

1000 E=MJi < I > : IFEC8120THENRETURN 

1001 P0KE36878,15:P0KE36877,130 

1004 GR=1sP0KE36879,42 

1005 F'OKECO+E—21,7: P0KEC0+E-23,7 : POKEC 
O+E , 7 : F'OKECO+E—22,7 

1010 P01<ECO+E—44,7 : F’OKECO+E-43,7 : POKEC 
O+E—45,7 

1015 POKEE,93 : POKEE-23,77 :POKEE-21,78 : 
POKEE-22,93 :POKEE-44,64 
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1020 F'OKEE—43,73 : POKEE-45,85 
1025 F'OKE3S877,200 

1030 IFE=8129 OR E=8130 OR E=8131THEHF' 

1031 M= I : GOSUB2000 : NK M > =0 : HO=HO+1 

1035 F’OKECO+E , 2 : F'OKEE104 : POKEE-23,32 : 
F'OKEE—22,32 : F'OKEE-21,32 
1040 F'OKEE—43.- 32 : POKEE-4432 : POKEE-45 

■“l •-! 

1045 P0KE368780 :P0KE3S8770 : CI =C I +1 : P 
0KE368738 : RETURN 

2000 FORN=SK < M > TONK < N > STEPDK C M > : POKEN , 
32 :NEKTN 

2005 MM C M > =7680+1 NT < RND < 1 > *22 > : SX C M > =M 
< M > : DX < M > = I NT < RND < 1 > *3+21 > 

2010 RETURN 

3000 EX=XK•:! J > :EV=VK<J> :E=7680+EK+EV*22 
: P0KE36878,6: P0KE36877220 
3005 POKEE+CO2 : POKEE+CO+1.-1: POKEE+CO- 
22.-1 : POKEE+CO—21.-1 

3010 POKEE+CO—23.-1 : POKEE+CO-1, 1 :POKEE+ 
CO+21.-1 : P0KEE+C0+22.-1 :P0KEE+C0+23,1 
3015 FORL=1T04:ONLGOTO3020,3030,3040,3 
050 

3020 F'OKEE ,81 : GOTO3080 
3038 F'OKEE,87 :GOTO3080 

3040 POKEE+CO , 1 : F'OKEE , 74 : POKEE+1,75 : F'O 
KEE-21,73 :POKEE-22,85 
3045 GOT03080 

3050 F'OKEE-1,93 : POKEE+1 , 33 : F'OKEE+21, 74 
: F'OKEE+22,64 : POKEE+23,75 
3060 POKEE-23,85 : POKEE-22,64 : F'OKEE-21, 

r -Zf 

3070 F'OKEE , 32 
3080 FORM=1TO50 : NEKTN,L 
3085 F'OKEE— 1,32 : POKEE+1.- 32 : F'OKEE+21.- 32 
:PGKEE+22,32 s POKEE+23,32 
309© F'OKEE—23,32 : F'OKEE—22.- 32 : F'OKEE—21 , 

3095 NI =M I -1 : KK C J > = 10: VK < J > = 13: F’K •:! J > =0 
: I FF'=5THENF'=0 

3096 IFNI =0THENF'=—2 
3100 FORL=0TOU 
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3185 I Fl'1'i C L > OERNDMK C L > OE+1 A NOME < L > <> 
E-22RNDM E < L > OE-21THEN3115 
3110 SC=SC+10*W : f'1=L : GOSUB2000 : Ki L > =0 : 
NO=WO+1 

3115 NEXTL : P0KE36873 ,■ 0 : P0KE368770 s RET 
URN 

4000 FRINT"HO SEI STRTO DISTRUTTO" 

4005 FRINT"a HAI RESISTITO FINO 
■RL"W"iP ATTACCO" 

4010 G0T0245 

5000 PRI NT " Ma>»1»» F'REM I *" 

5010 I FF'EEK 197 > =64THEN5010 
5020 POKE138,0 :RUN 
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IL CASTELLO INCANTATO 


Vivi questa avventura girovagando per incredibili luoghi che si aprono da¬ 
vanti a te in tempo reale. Guardati dal mostro che ti insegue, e cerca di rag¬ 
giungere il tesoro. 

Troverai porte che si aprono e si chiudono, ed una che può essere aperta 
con una sola chiave. 

In una delle stanze c’è un passaggio segreto che può essere individuato 
solo tastando tutta la parete; potrai così arrivare nel labirinto invisibile e poi 
alla STANZA. La STANZA è un luogo misterioso. Succedono le cose più 
strane, ma avrai trovato fuori tutto ciò che ti serve. Nota: se il tesoro era nel¬ 
la stanza, non poteva esserci quando sei entrato. 

I tasti per il controllo del cursore ti permetteranno di muoverti per tutto lo 
schermo; oltrepassando una porta ovviamente entrerai in una nuova stanza. 

Gli oggetti saranno sganciati alla pressione della barra dello spazio. Pre¬ 
mendo il tasto di divisione (/) si sguainerà la tua spada sulla destra, se ne a- 
vrai una. 

Lascerai una traccia sul percorso del labirinto invisibile, se vuoi uscire vi¬ 
vo da lì. 

II gioco termina se avrai preso sano e salvo il tesoro nella stanza da cui 
sei partito (o se ti sarai fatto mangiare); UN COMPITO DAVVERO NON FA¬ 
CILE! 
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10 SP=0 : GP=0:R-1:SR=INT<PHDC1>*4+1>:GR 
=4 : MR=GR+1 NT < RND < 1 > *3-1 > : X 1 = 10 ; V118 ; |<P 
=0 

15 C 0=3 0 ? 2 0 : X = 10 ;: V = 10 : S=7703 : G=8145: P 0 
KES50255 ; KR=9 : K=7756 : MP=32 
25 PRINT"□": IFRHD C1>>.5THENGR-1S 
50 0N R G 0 S U B1108 .,1208 , 1308 .,1400., 1500 .„ 16 
00 ,, 1 700 ., 1 800 ., 1 900 ., 2000 
10 0 P=7680+X+V # 2 2 

101 POKER , 32 sGETfl'T 

102 I FR=5THENP0KEF., 224 

105 DX= •:! m -" 18" > - C fìT="||" > : DY= C Fi t= " > - C 

R:t=7';pj" > :D=DX+DV#22 

186 PE=PEEK C P+D s I FPE=320RPE=224THEH 11 
5 

110 IFKP=1RNDPE=102THEN115 

111 IFPE=31THENSP=1: GOTO115 

112 IFPE=28THENGP=1 :GOTO115 

113 IFPE—127THENKP=1 : GOTO115 

114 DN=0sDV=0 

115 X=X+D X :V =V+0V 

120 IFR=3RNDX=13flNDV=11THENR=4:GOTO 126 

121 IFX>0RNDX<21RH0V>0RHDVC22THEH145 

125 R=R+ < X=0 >-<X=21> + <CV=22>-<V=0>>*5 

126 IFX=0THENX=20 

127 IFX=21T H EN X=1 

128 IFV=0THEHV=21 

129 I. F V=22THENV= 1 

130 IFR=3RN0X=20THENX =12 :V=11 
-135 IFR=4RNDX=13THENX=1 :V=11 

140 GOTO50 

145 P=7680+X+V #22:: P 0 K E P+C 0., 2 : P O K E P., 81 
150 I FSP= 1ORSRORTHEN160 
155 POKES-i-CO., 7 : POKES., 31 
160 I FGP= 1ORGRORTHEH170 
165 POKEG+CO., 5 : P0KEG .,28 
178 I FKP= 1ORKRORTHEH180 
175 POKEK-i-CO., 7 : POKER., 127 
180 IFGP=1RNDR=1THENEND 
185 I FMRORfìNDRND < 1 > >. 9RNDMR>— 1 THENMR= 
MR+ NR>R > - < NRCR > : MP=32 : X1 = 1 : V1 = 10 

190 IFMRORORRNO < 1 > <. 5THEN250 

191 M --7680+X1 + V1 #22 

195 POKERMP : I FGR=ROP.GP= 1THEN220 
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200 IFSP=0THEN220 

2@5 IFRND<1>>.93THENMR=IHT<RND < 1>#9+1> 
. f,ip =32 : X 1 =20 : V 1 = 10 : GOTO 250 
" 210 ~DX=<X 1 <X>-<X 1 >X >:DV=CV 1 <V>-C V 1 >V >: 


D=DX+0V*22 
215 GOTO230 

220 0X= C X1 >X > - < X1 <X > : DV= V1 >V 
D=DX+DV*22 


230 I FF'EEK C M+D > =320RF'EEK C M+D > =81THEN24 

0 

235 IFGP=0THEHDX=0 :DV=©:0=0 

240 X1=X1+DX:V1=V1+DV:M=M+D 

241 IFX1<1THENX1 = 1 :V1=V1 +1 

242 IFX1>20THENX1=20 

243 IFV1<1THENV1=1 

244 IFV1>21THENV1=21 

245 MP=PEEK <7680+X1+V1*22 >:M=7680+X1+V 
1*22 

246 POKEM+CO,4 : POKEM,94 

250 IFMR=RflWDX=X1flHDV=V1THEHEHD 

251 IFfìlO" "THEN26Ò 

252 I FSF'= 1 THEHSP=0 : SR=R ! 8=7703 
255 I FGF'= 1 THENGP=0 : GR=R : G=8145 
257 I FKF'= 1 THENKP=0 : KR=R : K=7756 
260 I FfìT-O " X " ORSP=0THEH 100 

265 8=?’680+X+V*22 — 1 ; POKES+CO , 7 : F'OKES3 

1 

270 IFX-1=XflNOV=V1THEHMR=-1 

275 FORI = 1TO100 : WEXT : F'OKES T 32 : GOTO 100 

1000 P0KE646,CL 

1005 PRI HT " aà" ; : FOR I = 1T022 : PRI NT " 5*1 
:HEXT 

1010 FOR I =8163T08185 : F'OKE I +00 , CL : F'OKE I 
,160 :NEXT 

1015 pRiNT"saa ai" 


1020 FOR I = 1 TO 20 : PR I NT " J 3 fili" ; : HEXT : RETO 
RH 

1100 F'OKE 36873,3 : CL= 1 : GOSUB 1000 
1105 F'OKE 7689,32 : POKE 7630 , r 32 : P 0 KE 7691 


1120 P 0 KE 7321,32 : P 0 KE 7343,32 : P 0 KE 7965 
32 :RETURN 

1200 F’OKE 36873109 : CL =5 : GOSUB 1000 
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1205 PGKE7900, 32 : P0KE7922, 32 : PQKE7944 , 
32 :POKE7690,32 :P0KE7691,32 :P0KE7692 ,32 
1210 FORI=1TO20 

1215 CL=IHT C RHDC1>+460>+7702 :1FPEEKCCL 
>032THEN1215 

1220 POKECL+CO , 5 : POKECL, 38 : HEKT : RETURN 
1300 P0KE3S879,27 : CL=3 : GOSIJB1000 
1305 POKE7690,32 : P0KE7691,32 :P0KE7692, 

S1IIIIIIIIH^ M 11 *** SIBHBIÌbIhI'' ; ' 

1315 FRINÌ" a 'llllllll SII 

IIIRIIII Sllìlllllll" ; 

132© print" limila annulli 

Simili» Sllìlllllll" ; 

1325 FRINT"a ' 1 HIIII 1 III 

Sllìlllllll" : RETURN 
1400 POKE36879,172: CL=2 : GOSIJB 1000 
1405 POKE7900,32 :P0KE7922,32 :P0KE7944, 

1410 POKE7921,224 :P0KE7943,224 :P0KE796 
5,224 :RETURN 

1500 P0KE36879,136 : CL=2 : GOSIJB 1000 

1505 FORI=ITO100 

1506 CL=7680+1NT C RND<1> +506 >: IFPEEK C CL 
>032THEN1506 

1507 POKECL,96 :NENT 

1510 POKE7900,32 : P0KE7922,32 :P0KE7944, 
32 :P0KE7925,32 

1515 POKE7690,32 :P0KE7691,32 :P0KE7692, 
32 :P0KE7713,32 

1520 P0KE7735,32 :P0KE7714,32 :P0KE7715, 
32 : RETURN 

1600 P0KE36879,216: CL=7 : GOSIJB 1000 
1605 FORCL== 1TO200 : POKE76S0+1 NT C RND C 1 > + 
506%,160 :NENT :P0KE8174,32 : P0KE8175,32 : P 
0KE8176,32 

1615 P0KE7921,32 :P0KE7943,32 :P0KE7965, 
32 : P0KE7942,32 : P0KE8153,32 :RETURN 
1700 P0KE36879,62 :CL=0:GOSUB1000 

1705 POKE7900,32 :P0KE7922,32 :P0KE7944, 
32 :P0KE7921,32 :P0KE7943,32 :P0KE7965,32 

1706 IFRND 1 > >. 5THENP0KE8174,32 : P0KE81 
75,32 :P0KE8176,32 
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1710 F'R IHT " gainMPMPi U i . . 

^fwTBTBlglBMgM " S F'R I NT " UShh H J3 « m i» — 

_ s RETURN 

1S 0 0 F' O K E36879 .r 5 6 : C L=2 : G 0 S U B10 0 0 

.1.805 POKE790032 : P0KE7922., 32 : P0KE7944., 

1806 IFRND < 1 !:• >. 2THENP0KE7921 , 32 : P0KE79 
4332 : P0KE7965., 32 

1810 POKE8174., 32 : F'OKES 175,32 : P0KE8176 , 
32 :RETURN 

1900 P0KE36879 .,14; CL=5 : GOSUB1000 
1905 POKE7900., 32 : P0KE7922., 32 : P0KE7944., 

i s 10 PR i nt " gaaaagsgiaaiiamiaesimii i 

• I Siili 1 " : RETURN 
2000 P0KE36879., 184 : GL=4 : GOSUB 1000 
2005 POKE7900., 32 : P0KE7922., 32 : P0KE7944., 
32 ;MR=R:K1 = 19:V1=20 :SP=0:SR=INT CRND<1>* 
3+8 > 

2030 8=7703 :KP=0:K=7756 : KR=INT C RND <1>* 
3+1>:GP=0 : GR=4:G=8145 :RETURN 
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FRUIT MACHINE 


Partendo da una cifra iniziale di 100$, devi cercare di vincere il più possibi¬ 
le dal tuo VIC trasformato in fruit machine. Ogni giocata ti costerà 5$ (un po’ 
caro, non trovi?). 

Le istruzioni sono contenute direttamente nel programma. 


10 P 0 K E 3 6 S 7 9... 8 
15 M= 100 : DIMH < 2 > , E < 2 > 

20 FORI =0102 : H <: I > =0 ; B C I 
1 :HEXT 

25 PRI NT "3B!!*ISil 

T" .a FRUIT MACH INE 1" 

26 PRIHT" a 1 2 
30 PRIHTCHRT < 28 >" a 


: I NT C RND 1 >*4+ 
"sPRIW 


35 PRIHTCHR $■ C 28 > " 

11 

40 F'R IHTCHRT < 28 > " 

I ! 

45 PRIHTCHR-T< 23 >" 
50 PRIHT" | 

55 PRIHT" a 

60 priht "dj ano 

65 PRIHT" 

70 PRIHT" 

75 PRIHT" 

80 PRIHT" 

85 PRIHT" 

90 PRIHT" 

95 PRIHT" 


I 


jaa 

aii 

ja " 


i ai " 

ho ho nav 


USOLDI $ 100 ar-lOHETEÌH |" 
" SPC 18 > ; " |" 

uvihci t o a- -erri r 
";SPCa.3>;"aT !U I" 

_m" 


100 PR I HT " Sg~mi»i»i»»il»fliaB»i» " ; M ; :: I FM< 1000 TH 
EHPRI HT " Il " 

101 PRIHT"HSBfflSffli PER GIOCARE : 'SPflZIO' 


105 IFH <: 0 -i-H < 1 > +H < 2 > >0THEHPR I HT " □! HU 
MERO DA TEHERE " 
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110 OETfì* s I FR*= " " THEH110 
115 IFR$=" "THEH150 
120 I F'v'lTL C RT =©ORVRL C fi# > >3THEH 110 
125 B=VAL R* > -1 :1FH < B > <> 1 THEH 110 
130 H B > =2 : RT= " spERMO " : GOSIJB1000 : GOTO 1 
10 

150 IFMC5THEH6000 

151 M=M—5 

152 H1=0 

153 FORB=0TO2:1FH <B >=2THEH160 

155 B B > = IHT CRHD < 1 > *2+1 > : IFRHD < 1 > >. 6TH 
EHB B > =B ■:! B > +1 :1 FRHD < 1 > >. 8THEHB < B > =B < B > + 
1 

160 GOSUB2000:HEKTB 

165 FORB-—0TO2 : H < B > =0 :1 FRHD < 1 > >. 9THEHH < 
B > = 1 

170 fl$ = " s) HO " : I FH < B > = 1 THEHflf = " SFI SSO 

II 

175 GOSUB1000 :HEXTB 

180 IFEK 0 =B < 1 > fiHDB C 1 > =B < 2 > THEHM1 = 15*B 

< 1 :> 

185 IFB 0 > =E: < 1 > ORB < 1 > =B C 2 > THEHM 1 = 10:+B C 
1 > 

190 I FB C 0 =4ORB C 1 > =40RB C 2 > =4THEHM 1 = 12 
200 M=M+M1 

2@5 F'R I HT " SSggMgMgliQSMilMgMgIgIgli>>>»»>! " : 
M1 ; : IFM1 < 18THEHPRI HT " || " ; 

210 PRIHT : IFM>399THEH5000 
215 GOTO100 

PR I HT " UOI**J" : I FB=2THEHPR I HT " HHill " ; 

1005 PRIHTRT:RETURH 

2000 PR I HT " SlBMBMglgMiHH " ; : I FB>0THEHPR IH 
T" |***1|" .? s I. FB=2THEHPR I HT » HIIII " ; 

2001 P0KE36878.r 10 :POKE36876.,RHD< 1 >*50+ 
180 :FORI=0TO300:HEKT:P0KE36878,0 :P0KE36 
8760 

2005 S=B <■. B > : OHSGOTO20102015,2020,2825 
2810 PR I HT " DI ' Siili '-ir*- 1 " : RETURH 

2015 PRIHT"li. . 291111* • RETURH 
2820 PR I HT " il r r aillll" CHR$ 28 > " • • " : R 
ETIJRH 

2025 PRIHT'V 291111'••aHUk.-' RETURH 
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5006 FORI = 1TO2000 : NEXT : PRI NT " A 

I FATTO SALTARE ffllL BANCO" 

5005 PRINT' VBMtgaH fll GUADAGNATO"M"*" 

5010 GOTO6050 

6000 FOR 1 = 1 T02000 : NEXT : PR I NT " 

MUTI SEI ROVINATO!" 

6050 PRINT"HffiEPIOGHI ANCORA? CS/hO " 
6055 GETA-t 

6060 IF m= " S " THENRUN 

6065 IFA$<>"H"THEN6055 

6070 PR IHTTAB < 8 > " MM3B I: IA01 ! " : END 
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DAMA 


Sfida il computer nel famosissimo gioco della dama. 

Inserisci la mossa prima come coordinata X, poi come la Y. Per esempio: 

DA DOVE MUOVI? AF 
IN? BE 


Dai, cerca di non far vincere il VIC. 



1 GOSUB9008 
50 MG=0 
60 GOSUB7008 

1000 F'R I NT " 11 

1005 F'R I NT " DR DOVE MUOVI " ; : MO=0 ; I NF'IJTF 

m 

1010 F'R I NT " IN " ; ; I NF'UTTHT 
1050 F'R I NT " □ATTEND I " 

ì 068 N*=LEFT$ < FHT , i > : V*=R IGHT $■ <■. FHt, 1 ;> : 
FK=RSC< X*> :FV-flSCCVT> 

1065 X$ =LEFT:T < THf1 > : Y$=R I GHT $ < THT , 1 > : 
TK=ASC X$ > a TV=FlSC Vf- !:■ 

1066 IF T X=F X 0R TY=FVTHENP0KE3687S,10:PR 
INVASOLO IN DIAGONALE ! !":GOTO3500 
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64 :F't'=FV— 64 :TX=TX-64 :TV=TV- 


10 7 0 F X=F X— 

64 

1420 140=0 

1430 AX < TV , TX > =RX FV , FX > : AX < FV , FX > =B 
1450 IFRBS TV-FV ) > 1 THEWMO= 1 : AX < FV+ < < TV 
-FV > X2 > FX+ < < TX-FX > X2 > =B ; T=T+1 
1470 GOSUB7000 
2000 V=S 
2006 X=S 

2020 IFfìX<:V,X>OC AND AXCVX > OKTHEH21 
00 

2030 I FAX C V r X > =C AND V=8THEHAX C VX > =K 

2040 FORD=0TO3 

2041 Q=—1 

2045 IFX+2*X D ) <11 OR X+2 #X D I>STHEH20'3 

0 

2046 I FV+2*V D > < 1 OR V+2*V-::D >>8THEN203 

0 

2050 IF <: RX C V+V < D > X+X C D > =H OR AX C V+V < 
0 > , X+X <: D > > =W > AHDRX C V+2*V C D > X+2*X < 0 > > =B 
THEHQ=D 

2070 IFAXCV,X>OK AND CO1THEH2100 
2080 IFQ>—1ANDQC4THEN2125 
2090 HEXTD 

2100 IFAX<V,X > =HAHDV=1THEWAX<V,X >=W 

2110 X=X—1 :1FX>0THEN2020 

2115 V=V—1 :1FV>0THEH2006 

2120 IFQ=—1THEH2350 

2125 PX=X+2*X C Q > : PV=V+2*V C Q > 

2130 8=8+1 

2135 AX C V+V < Q > X+X < Q > > =B 
2140 AX <PV,PX >=AX C V,X > 

2145 AXCV.,X::-=B 
2150 GOSUB7000 
2155 M=—1 
2160 FORD=0TO3 

2165 IFPX+2*X(0K1 OR PX+2*X<:D>>8THEH2 
200 

2166 IFPV+2*V(DK1 OR PV+2#V<D»8THEN2 
200 

2170 I FAX PV+V < D > PX+X C 0 > > OHAHD AX C PV 
+V 0 > , PX+X< 0 > > OWTHEH2180 
2175 I FAX PV+V < D *2 , PX+2*X < D > > =6THEMM= 

0 
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2180 IFAX<PV,PX>OK AND D>1THEH2210 

2190 IFM>—1THEH2210 

2200 NEXTD 

2210 IFM=—1THEN50 

2220 AX C F'V+V < M > , PX+X < M > > =B 

2222 AX F'V+2* V< M > PX+2#X < M > > =AX < PV,PX > 

2224 AX k PV r PX } =B:S=S+1 :GOTO50 

2350 V—0 

2360 PV= I NT C RHD C 1 > *8+1 > : PX= I NT < RND 1 > * 
8+1 :■ 

2370 V=V+1 

2371 Q=-1 

2375 IFV>400THEH2440 


2380 

2360 

2390 

2395 

2396 

2397 
2400 
2410 
2420 
2425 
2430 
2440 
2450 
2460 
2470 
7000 
7005 

22 , V 
7010 
L=6 
7015 
7020 
7025 
<V,X> 
7030 
7035 


7040 


I FfiX PV , PX > OC AND AX C PVPX > OKTHEN 

FORD=0TO3 
Q=—1 

IFPV+V<D><1ORPV+V<D> >8THEN2425 
I FF'X+X <: 0 :> < 1ORPX+X < 0 > >STHEN2425 
IFAXCPV,PX>=CAHDD>1THEH2425 

i fax <: pv+v <: o >, px+x < o > > =bthenq=d 

IFQ>-1ANOQ<4THEN2460 
HEXTD 

IFVC401THEN2360 
FT="L" 

GOTO7000 

AX PV+V < Q > PX+X < Q > > =AX < PV , PX > 

AX PV , PX > =B : GOTO50 
PRINT"SH ABCDEFGH" 

FORV=1T08 : POKECO+V*22,1sPOKESC+V# 

FORX=1T08 : CL=0:1FAX CV,X > = 160THENC 

IFAX CV,X >=C OR AX <V,X >=KTHENCL=5 
I FAX < V , X =H OR AX < V , X > =WTHEHCL= 1 
POKECO+V#22+X,CL:POKESC+V*22+X,AX 


NEXTX.-V 
F’R I NT " S 

" :F'RIHT"ZJTU 
FORI=0TO31SPRINT" 


:"S"|| 

"T 

";sNEXTSPRINT" 


7045 FORI=0TO21s PRINT" ";sNEXT:PRINT" 
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7050 FORI =0TO31 :PRI NT " " : NEXT : PR i HT " 

II 

7210 IFFT="L"THENPRIHT"8UTI DO PARTITO 
VINTA":END 

7230 I FS= 12THENPRI NT " BE H 1111I H O VINTO ! 

" :END 

7240 I FT= 12THENPRI NT " M H I II WAI VI NT 
0 !■":END 

7260 UT=""siFMO=1THENGOSUB9700 v 
7265 MO=0 

7310 IFLEFTT<UT,1> = "S"THENFHT=CHRT < TX+ 
64 > +CHRT TV+64 > : GOTO 1010 
7320 RETURN 
9000 DI MAX C 3 .r 8 

9005 V C 0 > = 1 : X < 0 > =-1 : V < 1 > = 1 : X < 1 > = 1 
9010 V < 2 >=- 1 :X< 2 >=- 1 :V<3 >=- 1 :X< 3 > = 1 
9050 H=209:0=215 :W=139 :K=151 

9060 B=160 :Q=-1 :FT="":S=0:T=0 

9061 00=38400 :80=7680 

9065 FORV=1TOS: IF2*INT <V/2 >=VTHENFORX= 
1T07STEP2:GOTO9075 
9070 F0RX=2T08STEP2 
9075 AX <V,X > = 160 

9080 IFI NT < X/2 > *2=XTHENAX C VX-1 > =32 
9085 IFI NT X/2 > *2<>XTHENAX < V , X+1 > =32 
9090 HEXTX,V 
9115 F0RV=1T03 

9120 IF2*INT <V/2>=VTHENFQRX=1T07STEP2: 
GOTO9130 

9125 F0RX=2T08STEP2 
9 130 AX <: V , X > =0 : HEXTX , V 
9140 F0RV=6T08 

9145 IF2*INT <V/2> =VTHENFORX=1T07STEP2: 
G0T09155 

9150 F0RX=2T08STEP2 
9155 AX V , X > =H : NEXTX.. V 
9165 FHT="":THT="" 

9300 P0KE368798 : PR I NT " Zìi J33AMA1 

":PRINT"SVUOI PARTIRE PER PRIMCQ" 

9310 I NF'UTVT : PR I NT " □" : IFLEFTT < VT , 1 > = " S 
"THENRETURN 
9340 GOSUB7000 

9350 A=INT <RND<1>*3+1>*2 :Q=INT CRND<1>* 



fi>=160 :R 


9370 fi";' < 3+VG! > , fi+K < Q > > =C : fi"; < 3 , 

ETURN 

9580 FORI=255T012SSTEP-.6 :P0KE36876I : 
N E X T : F' O K E36876 .r 0 : P 0 K E36878 , r 0 
3600 F'R I NT " □ " :GOS 

IJB7035 : GOTO 1000 

3700 FORI=7900108185 :POKEI,32 :NEKT 
3800 F'RINT"U01 SALTARE DI 
NUOVO : I NF'UTUT : RETURN 
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BOMBARDAMENTO 


Distruggi l’argine nemico e dai una mano a vincere la guerra. 

Lo sbarramento e l’intero paesaggio circostante è in grafica tridimensio¬ 
nale. Devi allineare il tuo aeroplano sull’argine che si avvicina e sganciare le 
tue micidiali bombe al momento giusto. 

Con Z sposti l’aeroplano a sinistra 

con C a destra 

con M sganci le bombe. 

Inizialmente hai cinque aeroplani, ma stà attento alla contraerea nemica. 



5 POKES50129 

1 0 PR INT " □" : P0KE3687988 : CO=30720 
15 FORI =7680TO7921 : POKE 1,160 : F’OKE I+CO , 
3 :NEXT 

20 pr i nt " agM5i5MqMt!>i.i.nyum a sin 

IRRHRHI LfilRRRRRRRI 

21 PRINT" filRHHRRRRI 

25 F’R I NT " IEk. “JSU. lUHUUULtftl —■ Zìi 

ir zìi i" 

26 pr i nt " k. “jSLZiRRuanw 

30 PR I NT " ——IJUlRJiKJKJKI'-••• " 
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35 F0RV=7954T08185STEP22 : J=1 NT < C V-7910 
;:« ,•••'22 !•* 

40 FORX=V—JTOV+J+1 :1FX>8185THEH45 

41 FOKEX, 16© : POKEX+CO, 6 

45 NEXTX : I FV-.JC8121THEHPOKEV-J , 233 

46 I FV+J+1 <=8185THENP0KEV+J+1 , 223 

47 NEXTV 

49 FORPL=1T05 

50 W1 = 160 :W2=W1 :k!3=W1 :W4=W1 :N=W1 :E1=U1 
:B2=W1:R1=W1:R2=W1:R3=U1 

55 X=8102+1 NT C RND •:! 1 > * 12 > : B=0 : D= 1 

60 POKE36878, 4 : P0KE36877 .,129: OE=0 

61 FL= INT CRND <1>*253 > +7955 

65 P=PEEK<FL>:P1=PEEK<FL+1>:P2=PEEK<FL 
+22 >:P3=PEEKC FL+23 > 


70 I FP=320RP 1 =320RF’2=320RP3=32THEN 100 

71 P0KE3687340 

72 POKE3687810 : P0KE36877200 

75 POKEFL+CO,7 :POKEFL+CO+1,7:POKEFL+CO 
+22,7 :P0KEFL+C0+23,7 

80 POKEFL,213 : POKEFL+1,201 :POKEFL+22,2 
02 :POKEFL+23,203 

85 IFP=120ORP1=120ORP2=120ORP3=120THEN 
DE=1 

86 P0KE36878,4 :PQKE36877,250 

90 POKEFL+CO,6 : POKEFL+CO+1,6:POKEFL+CO 
+22,6 :P0KEFL+C0+23,6 

35 POKEFL,P:POKEFL+1,P1 :POKEFL+22,P2:P 
OKEFL+23 , F'3 

96 IFDE=0THEN99 

97 P0KE36878,15:FORI=200TO128STEP-1 :PO 
KE36876,I : FORJ=1TO10 :NEXTJ,I 

98 POKE36877,150 

99 P0KE36879,88 :P0KE36877,129 

100 POKEK,N:POKEX+22,B1 :POKEX+44,B2:PO 
KEX+20,W1 :POKEX+21,W2:POKEX+23,W3:POKEX 
+24,W4 

105 POKEX+65,R1 :POKEX+66,R2:POKEX+67,R 


106 GETfi* 

110 X=X—22+<fl#="Z">-CflT="C"> 

111 IFX<=7702THEN1000 

112 IFDE=1THEN1000 
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115 H=PEEK C H > : B1 =PEEK X+22 > : B2=PEEK C X+ 
44 > : W1 =PEEK X+20 > :W2=PEEKCX+21 > 

128 W3=PEEK < X+23 > : W4=PEEK < X+24 > -RI =F'EE 
KCX+65 >:R2=PEEK < X+66>:R3=PEEK<X+67> 

125 POKEX , 226 : POKEX+22,87 : POKEX+4432 : 
POKEX+20, 128 : POKEX+21,120 : POKEX+23 , 120 
130 POKEX+24, 120 : POKEX+65235 : POKEX+66 

209 : POKEX+67,243 
140 FQRI=1TO50:NEXT 

145 IFB=0flNDfl*="M"flHDX>=7822THEHB=X+66 
:0=22 

150 IFB=0THEN60 

151 J=1 

155 POKEB .r 160 : B=B+D 
160 IFB<=7932THEN2000 
165 IFB>8185THEND=-22 
170 IFE!>8058THENC=209 

175 IFB<=8058THENC=174 

176 IFPEEKCB >0160THEW2000 
180 POKEB,C 

185 IFB—X>110RNDD=22THEND=—22 :GOTO200 
190 IFB—X<=88THEND=22 
195 GOTO250 

200 POKEB-1,205 :POKEB+1,206 

201 P0KE36877,240 

205 FORI = 1TO100 :NEXT:POKEB-1,160 :POKEB 
+1,160 

210 T=0 : GQTO60 

250 ,T=,T+1 :1 F J<=2THEN 155 
255 GOTO180 

1000 P0KE36S77,0 :P0KE36878,0 :P0KE36876 
,0:1FB>0THEHPOKEB,168 
1005 FORI = 1TO1000 : NEXT:NEXTPL 
1010 POKE650,0 :P0KE36878,0 :P0KE36877,0 
:P0KE36S76,0 

1020 FOR I = 1 TO 1000 : NEXT : PRI NT " 

HIHìTh L INEEIUNEMI CHEPJMlWUUUtfJMU=ENETRRTE " 

1025 PR I NT " »mi PERMCONT I NURREtE* " 

1030 GETRT : I FRT= " " ORR'TO " * " THEH1030 
1040 CLR:G0T05 

2000 I FPEEK B > = 160RNDB>7866THEN2050 
2010 P=PEEKCB>:POKEB,42 :FOR1 = 1TOl00 :NE 
XT 
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2015 F'OKEBP 

2020 FORI = 1TO100 : NEKT : E:=0 : T=0 : GOTO 100 

2050 IF D=—2 2 fi N 0 B—X > 8 8 T H E N 2010 

2051 IFD=22fiWOB-X<=66THEH2010 

2052 POKEB+CO , 2 : POKEB+1+CO , 2 : PQKEB... 127 
: POKEB+1 .r 255 

2053 P0KE36878,15: P0KE36877150 
2055 FORI=1TO200:NEKT 


2056 

2060 


II 


P0KE36878,10:POKE 
PEI NT "gE 


6877,200 

»»»■! tinsi 


2065 PRI NT " llUUUyUUiJ3 h. 1 S1IIIIIII 

11 

2070 G 0 T 01010 
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BREAKOUT 


Cerca di perforare il doppio muro con la tua paletta dotata di angolazione. 
All’inizio parti con 5 palline e scopo del gioco è guadagnare quanti più punti 
è possibile urtando i mattoncini del muro. Più questi sono in alto, più sono i 
punti conquistati. 

La velocità della pallina aumenta sempre di più a mano a mano che il pun¬ 
teggio sale. 

Con Z sposti la paletta a sinistra 
con M a destra. 


1 HI. =0 3 P0KE36878,12 

2 FRI NT "13+;** BREAKOUT ###" : FRI NT 

"SttlFREMI UN TASTO" 

3 GETA'T : I FA*= " " THEN3 

5 P O K E36879.-8: X=R N D C - TI > s S=0 3 LI = 10 : B S= 
10 FRINT"33 PUNTI FALL MAX 


~l" ; 

15 FORI = 1TO19s PRI NT" I 
I" ; : NEXT 


20 P0KE388S2, 6 3 P0KE38883 , 
1 3 P0KE8163 .r 103 

6 s P0KE8142,. 10 

25 PR I NTCHR* C 28 > " SHBaSUT 

nTTrrTTTTrm 

TTTTT ili» 1 INNI ITT TT1 1 TT1 

t r" .3 

30 FRINÌ "iftlirriTTTlTITTTT 
1 nrnTTTITTTTTI " ; 

rm iTTUsumT 

.ss pr i nt " MiiimmiTn 
m ITI 1 1 1 1 ITTlTlTTr" ; 

1 1 1 1 1 1 1 1 1 1 U.I 

40 PRiNT"3**irrnTn rrrrT 
i TTmiTrnTmT" .3 

pp t kit " l. suri' i r t 1 Trrrr 1 1 .r r 

itti n f iii .i .ri " 

T _ rT _ rrr'n m r “rrr' 


mTTTTT7' T'TTTTTT" 

5 0 S C=7680 :CL=38400 3 8=8152 
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55 DK=IHT CRND<1>*3-1>:DV=-1 :K=11 :V=20: 
PRI HT " 33" .? TRB < 17 > ; 6-LI 

56 pr i nt ■■ nmmm " HI 

60 FORI=38863T038882 :POKEI,1 :NEKT 
65 POKEB-1,103 :POKEB,98 : POKEB+1,123 

70 F0RI=1T0BS 

71 K=PEEK 197 > : IFKO33RN0KO36THEN100 
75 POKEB— 1 , 32 : POKEB+1,32 : B=B+ C K=33 > - < K 

=36 >: IFB<8144THEHB=8144 
80 IFEO8161THENB=8161 
85 POKEB-1,108 :POKEB,98 :POKEB+1,123 

100 NEKT I : PR I NT " 3UUmJUJ" S : I FS>200THENB 
8=2 :IFS>500THENBS=1 

101 POKESC+Y*22+K,32 :POKECL+V*22+K,1 :V 
=V+DV:K=K+DK 

102 IFV>21THEN1000 

103 IFK>1RNDKC20THEN106 

104 IFK<2THENDK=1 :P0KE36876,250 :GOTO15 

0 

105 IFK>19THENDK=-1 :P0KE36876,250 :GOTO 
150 

106 IFV<4THENDV=1 :P0KE36876,175 :GOTO15 

0 

110. I FF'EEK <: SC+V*22+K > =32THEN 150 
111 P0KE36876,200 
115 P=PEEK<SC+V*22+K> 

120 I FF'= 108THENDV=—OV ; DK=-1 : GOTO 145 
125 IFF'=123THENDV=—DV:DX=1 :GOTO145 
130 IFP=98THEHDV=—DV:DK=INT < RND <1>*3-1 
>:GOTO145 

135 8=8+10 :8=8-<VC7>*10-CV<5 > *30 

140 POKESC+V*22+K,32 :OK=INT C RND C1>*3-1 

) 

141 IFRNDC1>>.01THENDV=-DV 
145 V=V+DV:K=K+DK 

150 IFKC1ORK>20THENK=K+DK 

151 IFV<3THENV=V+DV 

152 P0KE36876,0 

155 POKECL+V*22+K,1 :POKESC+V*22+K,81 
160 GOTO70 

1000 FORI = 1TO2000:NEKT:LI=LI-1 :1FLI>0T 
HEN55 

1010 IFS>HITHENHI=8 
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1014 FQRI = 1T02008 :NEXT:PRINT"3UPUNTI"S 
:PRINT"MAN "HI 

1015 IFHI =STHEHPRINT"HHBRAVO ! HAI REAL 
IZZATO SIL MIGLIOR PUNTEGGIO" 

1016 PRINT" stB>» 3IOGHI ANCORA? <S/N>H" :P 
OKE1 98 .r 0 

1020 GETA*: IF A$=""THEN1020 
1030 IFA$="S"THEN5 

1035 I FA* = " N " THENPRI NT " MijUtiaaC IAO ! IB 
CIAO!fi":END 

1040 PR I NT " IMIMII1 I0N CAP I SCO ! " : GOTO 10 
20 
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BATTAGLIA AD INSEGUIMENTO 


Manovra in modo da colpire il tuo avversario pilotato dal computer in que¬ 
sto gioco aereo di morte. 

Evita di schiantarti contro la montagna o che l’aeroplano nemico si allinei 
dietro di te per poi colpirti. Il gioco termina se ti schianti o se qualcuno dei 
due precipita perchè colpito. 

Con A giri a sinistra 
con D a destra 
con W ti muovi in alto 
con X in basso e 

con S fai fuoco sull’aeroplano del computer. 



5 CO=:38720 ; POKE650129 
10 PQKE36879.,187:F'RINT":]" 

15 N=7988:V=1 ;X1=7961 :V1=-1 :8=0 :S1=0 


20 FRI NT"] 

Hiir \aiHir 

25 PRI NT " KUMULKM3 


^HIIHHRir 


^IRHRHHHHRMI 


30 PRI NT "llinuar S1RRRRRRRRI 

IHflr HHRHRHHHHHRRRRr 


il 
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35 FORI =8167T08182 : F'OKE I+CO, 5 : F'OKE I , 16 
0 :MEKTI :P0KE8182,223 

100 P0KE36878,4 :PGKE36877,135 

101 POKEK , 32 : PQKER+132 : POKER+2, 32 : POK 
ER+3, 32 : POKER-22,32 : POKER-21, 32 : POKER-2 
0.332 

105 POKER-19,32 :POKER+23,32 :POKEK+24,3 

125 GETR* : X=X+ < < R#= " M " > - C Fi$= " X " > > *22 
130 I Ffi$= " FI " THENV=-1 
135 I Ffì$= " D " THEHV= 1 
140 X=X+V 

145 IFX<77020RX>8160THENR=7938:V=1 
150 I FF'EEK X > O320RPEEK < X+1 > O320RPEEK 
v X+2 j O-320RPEEK X+3 j C732THEN1000 
155 I FF’EEK < X-22 > O320RPEEK C X-21 > O320R 
F’EEK X—20 > O320RPEEK < X-19 >032THEN1000 
160 IFPEEK < X+23 ) O320RPEEK< X+24 >032TH 
EH1000 

165 POKEX+l+C O0 : P 0 K EX+2+CO.-0:PO K E X—2 2 
+CO .r 0 s POKEX-21 +000 : P0KEX-28+C00 : POKER 
-19+00,0 

166 F’UKER+OUO n F*UKER+*3+CU r 0 s F’UKER+23+O 
0... 0 

170 IFV=1THEH200 

180 POKER107 : POKER+1196 : POKER+2160 : 
POKER+3.. 236 

185 POKER—21,85 :POKER-20,73 :POKER-13.-2 
3 3 : P 0 K E R+2 3.- 81 
190 G0T0215 
200 P 0 K E R+24+00 , r 0 

205 F’OKER .r 251 : POKER +1160 : F’OKER+2136 : 
POKER+3... 115 

210 POKER—22., 223 : POKER-2185 : POKER-20., 
73 : F’OKER+24... 81 

215 POKER 1., 32 : POKER 1 + 1, 32 : POKER 1+2,32 : 
POKER1+3,32 :POKER1-22,32 :POKER1-21,32 : P 
OKERl-20,32 

220 POKER1-13,32 :POKER1+23,32 :POKER 1+2 
4,32 

221 IFRND < 1 >. 9THENR1 =R 1 +22 

225 I FPEEK ■:! R1+V1 *5+22 > --2230RPEEK < R1 + V1 
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*5+22 > =233THENX1=X1-22 :GOTO250 

235 IFPEEK K1 + V1 *3 > =460RPEEK < X1 + V1 *3 ) = 
4STHENX1=X1-22 :GOTO250 

236 I FPEEK •:! X1 + V1 *2 > =46RN0S 1OX1 + V1 *2TH 
EHX1=X1-22 :V1=-V1 :GOTO250 

240 IFRND<1>>.9THEHV1=-V1 

241 IFRHD <: 1 >. 9THENV1 =-V1 

242 IFRHD <1>>.9THENX1=X1-22 
245 X1=X1+V1 

250 IFX1C7702ORX1>8160THENX1=7961 :V1=- 

1 

255 POKEX1 +1+C0,2 :POKEX1+2+C0,2 :POKEX1 
—22+CO , 2 : POKEX 1 -21+C0,2 : POKEX 1 -20+CO , 2 
260 POKEX1-19+CO,2 
265 IFV1=1THEH300 

270 P 0 K E X1 + C O , 0 : P 0 K E X 1 + 3+C 0 , 2 : P 0 K E X1+2 
3+CO8 

275 POKEX 1, 107 : POKEX 1 + 1-196 : POKEX 1+2., 1 
60 : POKEX 1 +3, 236 

280 POKEX 1-21,. 85 : POKEX 1 -20,73 : POKEX 1 -1 
9, 233 : POKEX 1 +23,81 
285 G 0 T 0 315 

380 POKEX 1+CO, 2 : POKEX 1+C0+3,0 : POKEX 1 +2 
4+ CO .r 0 

305 POKEX 1.-251 : POKEX 1 + 1,160 ; POKEX 1+2,1 
96 :POKEX1+3,115 

310 POKEX1-22,223 :POKEX1-21,85 : POKEX1- 
2 0 , i‘‘ 3 s P U K E i : * : i 1+24,81 

315 I Ffi$= " S " FiNDS=0THEHS=X-1 ; D=V : I FV= 1T 
HENS=X+4 : P0KE36877,240 
320 IFS=0THEN400 
325 J=1 

330 F'OKES , 32 : S=S+D : 8=8-7680 : SF'= I NT C 8/2 
2 > s 8 P=8—8 P *22 :8=8+768@ 

335 IFSP=0ORSP=21 THEMS=0 :GOTO400 
340 I FS=X 1 ORS=X 1 +1 OR C S=X 1 -21 fìHDV 1 =-1 0 
R S=X 1-20RNDV1 = 1 !:■ THEN2000 
345 I FPEEK C 8 > <>32THEHS=0 : ,T=2 : GOTO400 
350 POKES+CO , 0 : F’OKES ,46 
395 J=J+1 :1F• J<3THEN330 
400 IFS1=0THEN500 
425 J=1 
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430 F'OKES 1, 32 : S1 =S 1+D1 : S1 =S 1 -7680 : SP= I 
NT CS1/22>:SP=S1-SP*22:S1=S1+7680 
435 I FSF'=0ORSP=21THENS1 =0 : GOTO560 
440 IFS1=XORS1=X+1OR<S1=X-21RNOV=-1>OR 
<S1=X-20RNDV=1> THEM1000 
445 IFPEEK C 31 >032THENS1 =0 : J=2 : GOTO500 
450 F'OKES 1+CO , 2 : POKES1 , 46 
495 J=J+1:IFJC3THEN430 

500 IFS1=0RHDRHOC1> >.9THENS1=X1-2:01=V 
1 :1FV1 = 1THENS1=X1+5 :P0KE36877,240 
505 GOTO100 
1000 X1=X 

2000 P0KE36878 .,15 

2001 P 0 K E X1 ,32 : P 0 K E X1 +1., 32 : P 0 K E X1 + 2., 3 2 
: POKEX1 +3., 32 : POKEX1 +23., 32 : PGKEX1 +24., 32 

2005 POKEX 1 -22., 32 : POKEX 1 -20., 32 : POKEX 1 - 
19., 32 

2010 FORI=X1T08185STEP23 

2011 P0KE36875., < 250-1X35 > :+8 

2015 F'OKE I +00., 4 : POKEI +00+21., 4 : POKEI +00 
-214 : POKE I +00-23., 4 

2020 POKE I., 160 : POKE 1-21, 255 : POKE I +21,2 
55:POKE1-23,127 

2021 FORJ=1TO1©0 :HEXT 

2025 POKEI+00,160 :POKEI+00-23,0 :POKEI- 
21,32:POKE1+21,32 
2030 HEXT 

2035 I = I -23 : POKE I +00,7 : POKE I +00+1,7: F'0 
KE1,127:POKEI+1,255 
2040 P0KE36879,42 

3000 POKE650,0 :P0KE36878,0 :P0KE36877,0 
:P0KE36875,0 

3100 POKE 198,0 :F'RINT" 13 PREMI *" 

3200 GETRT : I FfìfO " * " THEN320© 

3300 CLR:G0T05 
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RAID NOTTURNO 


Interamente avvolto dal buio della notte, piloti il tuo aeroplano sulla città, 
sfruttando per prendere la mira i soli flash della contraerea nemica. 

Cerca di bombardare il reattore prima che ti colpisca qualche colpo della 
contraerea o uno dei missili terra aria delle basi nemiche di terra. 

Con W sollevi l’aeroplano 
con X l’abbassi 

con D acceleri in avanti (sei però già in movimento) 

con A torni indietro 

con S la bomba sulla città. 



5 CO-30720 

18 P0KE3S879... 8 : PRI NT " □" : M=0 : M1 =0 ; B=0 : P 
=7680:F=0 
15 PR I NT " 

1 sma a v 

2 0 P RIN T ' ' IMHURLl mm I fl BJT” 

25 PRINT"HHa 111 U ! .Ì9 l.a H I 

I " 

30 print" 3a.iai aa.ii i , J -,a * -a m m 

i- ""J " 

35 PRINT"3a aj" 
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POKEI+CO, 0 : F’OKE 1,16 


49 FORI=8142T08185 : 

0 :NEXT 

50 POKER , 32 : F'=F'+1 : K=PEEKC 197 > : F'=F'+ < K= 1 
7 *2- K= 18 > 

55 P=P + < K—9 K—26 > > ■+;22 

60 IFP<7680THEHF'=7 680 

61 I FP>7965THENF'=P—22 

65 I FF'EEK < P > 032RNDPEEK C P > O77RH0PEEK < 
P > -083THEN1000 

70 P0KEF'+CO , 3 : F'OKEP, 62 

75 IFM>0ORM1>0THEHPOKE36878,5 :P0KE3687 
7, 130 

76 IFMC1RNDM1<1THENP0KE36877,0 

80 I. FM>00RM<0THEH100 

90 IFRND 1 > >. 95THENM=8029 : POKEM+CO , 4 : P 
OKEM,42 :FORI=0TO100 :HEXT 

100 IFMC1 TRENI 50 

105 POKEM+CO , 1 : F'OKEM , 77 : POKEM+1,32 : POK 
EM+22,32:M-M—23 

110 IFM>7679THEH115 

111 M—0 

112 FOR I =8029X07680STEF'-23 : POKE I , 32 : HE 
XT : P0KE36377 ,• 0 : GOTO 150 

115 I FF'EEK M > =32THEN 135 

120 I FF'EEK C M > =62THEN 1000 

125 I FF'EEK < M > =46THENF'0KEM ,42 ; FOR I = 1TO1 
00 :NENT :B=0:M=0:GOTO111 

135 POKEM+CO , 2 : F'OKEM +1+C0,2 : P0KEM+C0+2 


140 F'OKEM ,127: POKEM+1 , 123 : POKEM+22,124 
150 IFM1>0ORM1C0THEN170 
160 I FRND C 1 > >. 95THENM1 =8062 : F'OKEM 1+C0 , 
4 : F'OKEM 1,42: FOR I = 1 TO 100 : HEXT 
170 IFM1C1THEN220 

175 F'OKEM 1+C0+22,1 : F'OKEM 1 +22,89 : F'OKEM 1 
+23,32:M1=M1-22 

180 IFM1>7679THEN185 

181 M1=0 

182 FORI=8062TO7680STEP—22 :POKEI,32 :HE 
XT:POKE80S4,93 :POKE8084+CO,0 :P0KE36877, 
0 :GOTO220 

185 I FF'EEK < M1 > =32THEN205 
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190 IFPEEK<M1> =62THEN1000 

195 IFPEEKCM1>=46THENPQKEM1,42:FORI=1T 
0100 :NEXT:B=0:M1=0 :GOTO181 

205 POKEM1+CO,2 : POKEM1 +1+CO,2 :POKEM1+C 
0+22,2 

210 POKEM1,225 :POKEM1+22,126:POKEM1+23 
, 126 

220 IFK=41RNDB=0THENB=P+22 

225 IFB=0THEN300 

226 P0KE36878,12:P0KE36876,B/25-75 

230 POKEB,32 :B=B+23:1FPEEK C B >=32RNDB<8 
185THEN290 

231 P 0 K E36876,0 

235 IFB>8185THENB=0:GOTO300 

240 I FBOMfìNDBOM 1THEM260 

245 POKEB+CO,4 :POKEB,42 :FORI = 1TO100 :NE 
XT:POKEB,32 

250 IFB=MTHENB=0:POKEM+1,32 :POKEM+22,3 
2 :M=0:GOTO111 

255 B=0:POKEM1+22,32 :POKEM1+23,32 :M1=0 
SG0T0181 

260 IFBC8032THEH290 

261 P0KE36879,42 : POKEB+CO,7 :POKEB+CO+1 
,7 :POKEB,77 :POKEB+1,78 

262 P0KE36878,15:P0KE36877,147: FORI = 1T 
0300 :NEXT 

264 P0KE36879,8 

265 IFB<80590RB>8060THEH282 

266 POKEB+CO,1 :P0KEB+C0+1,1:P0KEB+C0+2 
2,1 :P0KEB+C0+23,1 

267 POKEB,32 :POKEB+1,32 

270 FORI=1TO50:P0KE36879,127:P0KE36879 
,42 

271 POKEB,32 :1FI>=25THEHP0KEB+1,32 :POK 
EB+22,32 : POKEB+23,32 

275 IFIC25THEHP0KEB,87 

230 IFI>=25THEHP0KEB,85 : POKEB+1,73 :POK 
EEì+22,74 : POKEB+23,75 

281 NEXT I :PRI NT " ST : P0KE36878,0 : P0KE368 
77,0 :POKE198,0 :END 

282 POKEB,32 :PGKEB+1,32 

283 IFB<>8052RNDB O8074THEN286 

284 IFM>0THENP0KEM,32 :POKEM+1,32 :POKEM 
+22,32 
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285 M=—l:G0T0112 

286 IFBO8051THEN289 

287 I Ff'11 >0THEHP0KEM1 , 32 : POKEM1 +22,32 : P 
OKEMl+23,32 

288 Ml=-1:GOTO182 

289 B=0:GOTO300 

290 POKEB+CO,5 : POKEB,46 

300 IFP.ND C1><.9THEH50 

301 F= I NT PHD < 1 > #264+7681 > 

305 IFF=MORF=M1THEN50 

306 P0KE36878,9 :P0KE36375,130 :P0KE3687 
6,129 :P0KE36877,163 

310 POKEF+CO,4 :P0KEF+C0-23,4 :POKEF+CO- 
21,4:POKEF+21+CO,4 :P0KEF+C0+23,4 
315 P0KE36879,40 :POKEF,209 :POKEF-23,12 
7 :POKEF-21,255 :POKEF+21,255 :POKEF+23,12 

l*‘ 

320 I FF=PORF—21 =P0RF-23=P0RF+21 =F'0RF+2 
3=F'THEH 1015 

325 FORI = 1TO200:NENT :P0KE36879,8 :POKEF 
,32 : POKEF-23,32 :POKEF-21,32:P0KEF+21,32 
330 POKEF+23,32 :P0KE36875,0 :P0KE36877, 
0:POKE36876,0:GOTO50 
1000 P0KE36879,120 :POKEP+CO,2 :POKEP+CO 
+23,2 : P0KEP+C0+2,2 :P0KEP+C0+46,2 :POKEP+ 
CO+44,2 

1010 POKEP,127:POKEP+2,255 :POKEP+23,20 
9 : POKEP+44,255 :POKEP+46,127 
1015 P0KE36875,0 :P0KE36876,0 :P0KE36877 
,0 :POKE36878,0 
1020 F'OKE 198,0 : PRI NT " a" 


97 




BATTAGLIA CON I CARRI ARMATI 


Imposta una strategia per sconfiggere il carroarmato guidato dal compu¬ 
ter in questo gioco incredibilmente veloce. 

Si guadagnano punti colpendo il carroarmato nemico e le sue taniche di 
carburante. Gira per tutto lo schermo, inseguendo il carroarmato-computer 
e evitando le mine. 

Alla partenza ti troverai nell’angolo in alto a destra, il computer in quello a 
sinistra. 

Con W sposti in alto il carroarmato 
con A a sinistra 
con D a destra 
con X in basso 

con S fai sparare il tuo cannone. 

Vince chi per primo arriva a 150 punti. 



5 POKE650,255 

10 P0KE36879248 : PRI NT " □" : CO=30720 : SC= 
0 :CC=0 
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15 FOR I = 1T0:L5: M=7S80+1 NT C RHD < 1 > *506 > : P 
OKEM+CO,2 : POKEM,42 : HEXT 
20 FOR I = 1TO10 : M=7682+RHD t 1 > *5+ < C RHD '■ 1 > 
*5+1 > *22 :> 

25 POKEM+CO,5 : POKEM,160 
30 NEXT 

35 FORI = 1TO10 :M=8185-RNDC1>*5-CCRHD<1> 
*5+1 !:> *22 > 

40 POKEM+CO,6 :POKEM,160 
45 HEXT 

50 FOR I =7684T07728STEP22 : POKEI+C02 : PO 
KEI+C0+1,2:POKEI+2+C0,2 
55 POKE1,81 :POKEI +1,81 :POKEI +1,81 :HEXT 
60 FORI=8135T08181STEP22:POKEI+C0,3 :PO 
KEI+C0+1,3 :POKEI+2+C0,3 
65 POKEI,81s POKE1 + 1,81:POKEI +1,81 :HEXT 
70 POKE38400,5 :POKE38305,6 :POKE7680,11 
4 :P0KE8185,113 

75 C=7680 r. P=8185 : DC=22 : DP=-22 : EP=8 : EC= 

0 

80 DIMDXC3 >:DX<0> = 1:DX<1>=22 :DX<2 >=-1 : 
DX<3>=-22 

100 GETTI# : I Ffi#= " " ORR*= " S " THEH150 
105 EP=<R$="fl">-<R#="D"> + CCfì*="W">-<B$ 
= "X"> >*22 

110 IFEP=0THEN150 

111 POKE36878,5 :P0KE36877,230 
115 DP=EP : POKER,32 : P=P+DP 

117 IFP C76800RP>8185THEHP=P-DP 
120 IFPEEK P > =42THEHP0KEP+C0,4 : P0KE368 
77,140 :FOR1 = 1TO200:HEXT:CC=CC+20 
125 I FPEEK P > <>32THEHP=P-DP 
130 POKEP+CO,6 :CH=107:1FDP=22THEHCH=11 
4 

135 IFDP=—1THEHCH=115 
140 IFDP=-22THEHCH=113 
145 POKER,CH 

150 P0KE36877,0 :P0KE36S76,0 

151 EC=DC 

152 IFPEEKCC+EC >=32flHDRHD < 1> >.3THEH175 
155 1=0 

160 IFC+EC C7680THEH175 
165 IFC+EC>8185THEH175 
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170 IFPEEKC C+EC>=32THEN200 
175 1=1+1 

180 IFI>8THEN195 

181 IFRND 1 > <. 9THEN193 

185 IFC<PTHENEC=DX < INTCPHD<1>*2 > > : GOTO 
160 

190 E 0=0/CINTC PHD C1>*2+2 >>:GOTO160 

193 EC=DX <: I NT < PNO C 1 > *4 > > 

194 GOTO160 

195 EC=0:GOTO205 

200 DC=EC:IFPEEK <0+00*22>=46THENDC=-DC 
:GOTO150 

205 POKEC,32 : C=C+EC:POKEC+CO,5 :CH=107 : 
IF0C=22THENCH=114 
210 IFDC=-1THENCH=115 
215 IFDC=-22THENGH=113 
220 POKEC,OH 

225 IFS=0RNOfl$="S"THENS=P+DP:DS=DP:POK 
E36876 245 : P0KE36877 150 

230 IFS=0THEN300 

231 J=1 

235 POKES32 : S=S+DS : I FPEEK <S > =32THEN26 

0 

236 P0KE36877,130 

240 I FPEEK C S > 0810RS>7910THEN255 

250 FOR 1 = 1 T01200 : NEKT : POKES , 32 :80=80+10 
255 I FS=CTHENSC=SC+20 : POKEC+CO4 : POKEC 


42 : 

P0KE3 

16876. 

r 1 30 



256 

8=0 : 

goto:: 

300 



260 

8=8- 

7680 ! 

: V= I NT 

8/22>:K=S—V*22: 

s=s+ 

680 






265 

IFK= 

0ORX- 

=21 OR V= 

0 0 R V=2 2 T H E N 8=0 : 

GOTO 

: 0 0 






270 

POKE 

8+CO 

■ 6 :POKE 

8 .,46 



300 IFRNDC1>>.9RN0S1=0THENS1=0+00 :08=0 
0 : P0KE36877 , 140 : P0KE36876245 

305 IFS1=0THEN400 

306 J=1 

310 POKES 1,32 :81 =81 +08 :1 FPEEK C 81 =32TH 
EN335 

311 P0KE36877,130 

315 I FPEEK < 81 > 031ORS1 <7910THEN330 
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320 POKES1+CO - 4 : POKES1 ..42 

325 FOR1 = 1TO200:WEKT:POKES132 :CC=CC+1 

0 


330 IFS1 =PTHEHCC=CC+20 : POKEP+CO.- 4 : POKE 

P , 42 :POKE36376,130 

331 S1=0 :GOTO400 

335 S1 =S 1-7680 : V=I NT < S1 .■■'22 > : X=S 1 - V*22 : 
S1=S1+7680 

340 I FX=0ORX=21 ORV=0ORV=22THENS 1 =0 : GOT 


0400 

345 POKES .-32 :S=$ 
V*22 

350 S=S+7680 :1FJ 


7680 : V= I NT •:! S/22 > : X=S- 
0ORX=21ORV=0ORV=22THE 


NS=0:GOTO400 

355 POKES 1+C05 : POKES 146 
360 ,T=,T+1 :1FJC3THEH310 
400 IFSCC150RNDCCC150THEN108 
1000 POKE6500 s FOR I = 1TO2000 : NEXT 
1005 F'R I NT " □ÈMSjF'UNT I : " : PRI NT " S>fig TU " SO : 
PRI NT " H»COMPUTER " OC 
1010 P0KE368760 : P0KE368770 : P0KE36878 
..0 : POKE 198.-0 
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STELLA MORTALE 


Porta il tuo caccia fin sopra il fosso della Stella Mortale, evitando i colpi la¬ 
ser nemici. Poi quando il bersaglio sarà visibile, lancia il tuo siluro e spera in 
un centro perfetto. 

Con Z sposti il tuo caccia a sinistra 
con C a destra 
con M lanci il siluro. 

Un qualsiasi tasto numerico ti permetterà di modificare la velocità di avvi¬ 
cinamento al confine. 

Ricordati, non sparare troppo presto. 



1 P0KE36879,24 :POKE650,129 :SC=4+1HT CRN 
D < 1 > * 11 : SP= 1 : DI =0 : TP=© : TL=5 : CO=30720 

B<sc>"iiar^" 

3 PRI HTCHR* •:! 28 > " 


4 PR I HT " aaUCi IST. COPERTA : " 

5 PR I HT " □JS 
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45 FRINT" 

Il 

50 FRINT" 

11 

60 FORI =7680TO8164STEP22 : POKEI+CO, 2 : PO 
KEI,160 :NENT :FORI=7701T08185STEP22:POKE 
I+C0,2 

70 POKE I... 160 : NEKT 

80 FOR I =8165T08184 : POKE I+CO2 : POKE 1,16 
0 :NEKT 

100 GETR*: IFfl$=""THEN120 
110 IFR*="Z"ORR*="C"THEN500 
115 IFfì*="M"R N D T P=8 R N D T L < >0THE NTP=8098 
+SC : TL=TL-1 : T < 1 > =32 : T 2 > =32 : T < 3 !:■ =32 : GOT 
0120 

118 sp=vrl <: m > 

120 0I=DI+1 

130 IFRND <: 1 <. 114RN001 <460THENGOSUB 100 

0 

135 I FRND 1 > <. 11THENGOSUB2500 
140 IFDI=460THENGOSUB1580 
150 IFDI=560THEN2000 

I 

161 PRI NT " TTTIiIlKHiMilitHatl lfcia" ; TL 

162 IFTPO0THENGOSUB3000 
165 IF SP> 7TH EN180 

170 FOR1=1TO1400—SP#200:NEKT 
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180 GOTO100 

500 pr i ht " anffitpffi<ann>a^^ : pr i ht 

TflBCSO" 

505 SC=SC+ < fli= " Z " > - f\t= " C " > 

510 IFSO 16THENSC= 16 
520 IFSC<4THENSC=4 

TfìBcso "jjjar'r 
530 GOTO120 

1000 POKE36879,120 :V=INT< RHD<1>*6 >:X=2 
+1 NT <: RND < 1 > * 16 > : FL=7988+ C V*22+X > 

1010 F <1>=PEEK<FL-23> 

1020 F <! 2 ) =PEEK «C FL—21 ■' 

1030 F 3 > =PEEK C FL > 

1040 F 4 > -PEEK C FL+21 > 

1050 F < 5 >=PEEK <FL+23> 

1060 POKEFL—23+CO2 : POKEFL-23 .,127: POKE 
FL—21+C0,2 :POKEFL-21,255 :POKEFL+CO,4 :PO 
KEFL.,81 

1070 POKEFL+21+C0,2 :POKEFL+21,255 :POKE 
FL+23+C0,2 : POKEFL+23127 
1075 FORI = 1TO111 :NEXT 

1080 POKEFL—23+CO,0 :POKEFL-23,F <1>:POK 
EFL-21+CO , 0 : POKEFL—21 , F •:! 2 ì : POKEFL+CO0 : 
POKEFL,F C3 > 

1090 POKEFL+21+C0,0 : POKEFL+21F 4 > : POK 
EFL+23+C0,0 : POKEFL+23,F <5 > 

1091 IFF C 3 > =TPORFC3 >=TP+220RF<3 >-TP+23 
THEN1200 

1100 P0KE36879,24 
1110 RETURN 

1200 POKETP , T 1 > : POKETP+22 , T < 2 > : POKETP 
+23.,T '-.Sì :GOTO3200 

1500 P0KE7954+C0,2 : P0KE7954 .,213: P0KE79 
55+CO., 2 : P0KE7955., 201 
1510 P0KE7976+C0,2 : P0KE7976., 202 : P0KE79 
77+CO., 2 : P0KE7977., 203 
1520 RETURN 

2000 P0KE36879., 120 : FOR I = 1TO250 : NEXT : PO 
KE36879., 40 

2005 FOR1=1TO250:NEXT 

2010 P0KE36879., 120 : FOR I = 1TO250 : NEXT : PO 
KE3S879., 40 
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2015 FOR1=1TO250:NENT 

2020 P0KE36879,120 :FOR1 = 1TO250:HEKT:PO 
KE36873,40 

2025 FORI=1TO250:NENT 

2030 P0KE368798 : F'R I NT " □jgBE I MORTO !!! 

! ! ! !-» 

2050 REM *##KflBOOM*** 

2100 END 

2500 FORI=7998T08152STEP22 

2501 IFI=TPORI=TP+23THENH=1 

2510 POKEI+CO2 : POKEI103 : HE NT 

2515 FORI = 1TO100 :HEKT 

2520 FORI=7998T08152STEP22 

2530 POKE 1.332 : HEKT 

2535 IFH=1THEH1200 

2540 IFSC=90RSC=10THEH2000 

2550 RETURN 

3000 POKETP , T < 1 : POKETP+22 , T < 2 > 

3001 POKETP+23 .r T (. 3 > 

3010 TP=TP-22 

3020 IFTPC7724THEH3200 

3030 IF <TP=79980RTP=7399 >flHDSP>5RHDDI> 
525THEN4000 

3031 IFPEEKCTP > = 160ORPEEK<TP >=46THENZ < 

1>=128 

3032 IFPEEK <TP+22 > = 160ORPEEK < TP+22 >=46 
THENZ 2 > = 128 

3034 IFPEEK <TP+23 > = 160ORPEEK<TP+23 >=46 
THENZ<3> =128 

3035 T <1> =PEEK <TP > 

3036 T < 2 >=PEEK <TP+22 > 

3038 T C 3 > =PEEK<TP+23 > 

3040 POKETP+CO,0 :POKETP,103+ZC1>:POKET 
P+22+C0,0 :POKETP+22,106+Z C 2 >:P0KETP+23+ 
CO,0 

3045 POKETP+23101+Z < 3 > 

3050 RETURN 

3200 TP=0:FORI = 1T03:Z <I>=0 :NEKT:H=0 

3201 RETURN 
4000 F0RI=1T05 

4005 P0KE7954+G07 : P0KE7954 .,213: P0KE79 
55+CO,2 :P0KE7955,201 
4010 P0KE7976+C0,7 :P0KE7976,202 :P0KE79 
77+C0... 7 : P0KE7977203 
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4020 FOR J=1TO250:NENTJ 

4030 P0KE7954+C0,2 :P0KE7954,213 :P0KE79 
55+CO,2 :P0KE7955,201 
4040 P0KE797S+C0,2 : P0KE7976 202 : P0KE79 
77+CO,2 :P0KE7977,203 
4050 NEKT 
4060 FOR1=ITO10 

4100 P0KE36879,120 :FORJ=1TO250:NEKT:PO 
KE36S73,40 

4110 FOR11 = 1TO180 :NEKT 
4120 NEKT 

4200 P0KE36873,8 : PRI NT " □sJBRHVO ! CE L ' H 
RI FRTTR" 

4210 FRI NT "il HRI DISTRUTTO LR jlfSTELLR 
MORTALE ! " 

4220 PRINT"E HRI SALVATO LR TERRA" 

4300 REM **END** 

4310 END 
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M 

CTRL+1 

al 

CTRL+2 

ih. 

CTRL+4 

il 

CTRL+5 

li 

CTRL+S 

na 

Ufl 

CTRL+7 

03 

CTRL+8 

a 

CRSR DOWN 

□ 

CRSR UP 

u 

CRSR RIGHT 

il 

CRSR LEFT- 

ss 

CTRL+RVS ON 

s 

CTRL+RVS OFF 

a 

HOME 

□ 

SHIFT+CLR 


78 65 
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I giochi: quanti hanno cominciato proprio da qui a inte¬ 
ressarsi di Personal Computer? 

È il modo più divertente e, apparentemente, meno 
“produttivo” di avvicinarsi ad un calcolatore, ma na¬ 
scondono programmi raffinati e complessi che presup¬ 
pongono una precisa conoscenza della macchina e 
delle tecniche di programmazione. 

Questo libro ne presenta diversi di diversa difficoltà: 
due parole su come si gioca e poi il listato del pro¬ 
gramma. 

Giocare è facile, meno facile capire che cosa fa il pro¬ 
gramma; ma per qualcuno, più probabilmente per i 
giovanissimi, la curiosità di spiegarsi come fa uri razzo 
a muoversi sul video e un missile a colpirlo inesorabil¬ 
mente, può diventare uno stimolo non trascurabile ad 
affrontare un manuale di BASIC e poi a scoprire i se¬ 
greti di questi programmi. 

Buon divertimento! 












